您好,Excel工作表中,想利用一个宏程式来实现日期范围筛选,求高手帮忙一下!给我发一个么?谢谢!
展开全部
假设你的数据表中,A列示日期列,你要对A列日期进行筛选,单元格B1输入你需要筛选日期的起始日期,单元格C1输入你需要筛选日期的结束日期。
代码如下:
sub filterdate ()
if range("B1")="" or range("B1").value > range("C1").value then
msgbox "请检查筛选日期合理性"
exit sub
end if
range("A1").AutoFilter field:=1,criteria1:=">=" & range("B1"), Operator:=xland,criteria2:="<=" & range("C1")
end sub
在你需要操作的表中插入表单控件按钮-指定宏,点击新建,然后把这段代码复制过去就可以了。当然代码中B1,C1可以换成你自己需要的单元格。
代码如下:
sub filterdate ()
if range("B1")="" or range("B1").value > range("C1").value then
msgbox "请检查筛选日期合理性"
exit sub
end if
range("A1").AutoFilter field:=1,criteria1:=">=" & range("B1"), Operator:=xland,criteria2:="<=" & range("C1")
end sub
在你需要操作的表中插入表单控件按钮-指定宏,点击新建,然后把这段代码复制过去就可以了。当然代码中B1,C1可以换成你自己需要的单元格。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询