Question

我试图在2个月前（即2016年12月）过滤并且无法正常工作。但是，如果我进入excel选择编辑当前过滤器并按确定，它将显示正确的结果。有什么问题？

我的代码：

<select name='selectized' id='selectized' class='form-control'>
    <option value='1'>one</option>
    <option value='2'>two</option>
    <option value='3'>three</option>
</select>

<script>
    $(document).ready(function() {
        $('#selectized').select2({
            placeholder: 'sometext',
            allowClear: false
        });
    });
</script>

Answer 1

一行就足够了：

Worksheets("SER Common").Range("A1").AutoFilter field:=1, criteria1:="<=" & CDbl(Evaluate("EOMONTH(TODAY(),-2)"))

Answer 2

在@Shai Rado的评论中，这是另一种方法（除了转换为dbl）：

Option Explicit
Public Sub TestMe()

    With ActiveSheet
        .Range("A1").AutoFilter Field:=1, Criteria1:="<=" & Format(DateAdd("m", -2, Now()), "yyyy-mm-dd")
    End With

End Sub

我们的想法是将其格式化为yyyy-mm-dd，这种格式可以通过Excel识别。加上DateAdd，它看起来更容易理解。

VBA过滤2个月前

2 个答案: