工作中,我们常常需要从海量数据中筛选出特定日期范围内的信息,手动操作耗时又易错?别担心!今天教大家用VBA实现自动化筛选,高效又精准!👀
首先,打开Excel表格,按下`Alt + F11`进入VBA编辑器。点击“插入”→“模块”,输入以下代码:
```vba
Sub FilterByDate()
Dim StartDate As Date, EndDate As Date
StartDate = InputBox("请输入起始日期(格式:YYYY-MM-DD)")
EndDate = InputBox("请输入结束日期(格式:YYYY-MM-DD)")
ActiveSheet.Range("A1").AutoFilter Field:=1, Criteria1:=">=" & StartDate, Operator:=xlAnd, Criteria2:="<=" & EndDate
End Sub
```
保存后返回工作表,运行宏即可按日期筛选数据!筛选结果还可另存为新文件,方便后续使用。📚✨
学会这一招,工作效率up up!快试试吧!🚀