作者：乔山办公网日期：
返回目录：excel表格制作
如果只是查询到期日，没必要用msgbox，这样很难看清，建议直接筛选的方法。\r 在B列筛选：条件为 小于或等于 当前日期+5 比如输入4/26 这个方法最简单。\r \r \r 也可以用一个辅助列，加以if函数，筛选，更方便。\r \r \r 一定要用msgbox，用如下代码：（仅供参考，需要根据实际情况修改）\r Sub cha()\r Dim m As String\r For i = 2 To [a1].End(xlDown).Row - 1\r If Cells(i, 2)
本文标签：