元のワークシートのままで以下お試しください。 dt.AsEnumerable.Where(Function(r) r("完成希望日") IsNot Nothing AndAlso (not String.IsNullOrEmpty(r("完成希望日").ToString())) AndAlso DateTime.Parse(r("完成希望日").ToString) > Today).CopyToDataTable() 2 个赞 ...