Question

正如标题所示，我正在尝试使用DTpicker对象中的值来过滤尝试查找晚于输入值的日期的日期范围。

日期输入格式为dd / mm / yyyy，我认为应该没问题。

我正在努力的代码基本上是以下行，因为我运行它它根本找不到任何值。

ThisWorkbook.Sheets("Rådata").AutoFilterMode = False
ThisWorkbook.Sheets("Rådata").Range("N1:N700").AutoFilter Field:=1, Criteria1:="=>" & DTPickerFra.Value, Operator:=xlAnd

由于

Answer 1

您的条件的Excel格式是“大于或等于”而不是相反。

我通过将Criteria1更改为“＆gt; =”而不是“=＆gt;”来实现它的工作

ThisWorkbook.Sheets("Rådata").AutoFilterMode = False
ThisWorkbook.Sheets("Rådata").Range("N1:N700").AutoFilter Field:=1, Criteria1:=">=" & DTPickerFra.Value, Operator:=xlAnd

在excel2010 vba中使用datepicker值作为autofilter参数

1 个答案: