【问题标题】:How do I filter with date In VBA如何在 VBA 中过滤日期
【发布时间】:2015-06-24 15:31:52
【问题描述】:

我有以下代码,我希望用户只设置一个日期,如“22/06/2015” 并让该日期进入过滤器。问题是当我第一年去过滤器时, 然后我检查一年,出现月份然后是日子。 (我只是展示了一部分代码)

Sub PassaProRelatorio(planilha As Worksheet, nome As String)
Application.ScreenUpdating = False
On Error Resume Next
ActiveSheet.ShowAllData
Dim contaLinha As Integer
Dim array1 As Variant
Dim mes As String
mes = InputBox("Digite até a data que deseja EX: 27/02/2015")
array1 = Array(1, mes)
Sheets("BasePenhoras").Activate
ActiveSheet.Range("$A$1:$DO$80000").AutoFilter Field:=10, Criteria1:=nome
ActiveSheet.Range("$A$1:$DO$80000").AutoFilter Field:=11, Criteria1:= _
    "Concluído"
ActiveSheet.Range("$A$1:$DO$80000").AutoFilter Field:=72, Criteria1:= _
    "Bloqueio"
ActiveSheet.Range("$A$1:$DO$80000").AutoFilter Field:=5, Operator:= _
xlFilterValues, Criteria2:=array1here

【问题讨论】:

  • 你能澄清一下你的问题吗?看完后还不是很清楚自己到底想要什么。
  • 是的,我知道这很难解释。我想按日期过滤一张纸。但首先我必须过滤它们的月份和最后一天的年份。我怎么做。但是通过输入框获取要过滤的参数,例如日期。

标签: excel vba date filter


【解决方案1】:

如果我正确理解您的问题,这会将您的日期更改为您正在寻找的格式:

Format(DateValue(mes), "yyyy-mm-dd")

【讨论】:

  • 我的问题是在 VBA 中过滤日期,因为它保持打开复选框,我不知道如何使用 VBA 来检查它们
猜你喜欢
  • 2023-02-02
  • 1970-01-01
  • 2014-06-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2016-07-17
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多