时间戳

首页 > 解决方案 > 如何使用具有 2 个条件的 VBA 过滤日期列？

vba - 如何使用具有 2 个条件的 VBA 过滤日期列？

问题描述

我在包含空格和日期的表中有一个列。如何在 VBA 中编码以排除将来的空白和日期的选项？

标签： vbadatefilter

解决方案

这应该过滤掉空白和未来的日期。

请注意，它只会从您指定的列中过滤掉这些Field（基于列号），因此如果您想隐藏所有空白而不是仅隐藏一列的空白，您可以重复该行并根据需要进行调整（或使用环形）。

Sub FilterBlankAndDates()

    With sheets("Sheet1").ListObjects("Table1").Range
        .AutoFilter Field:=1, Criteria1:="<>"
        .AutoFilter Field:=2, Criteria1:="<=" & Date
    End With

End Sub

推荐阅读