嗯,明白了,非常感谢。
不过问题还在。
我想过滤成日期等于4月的数据,不管是哪一年。
这个能不能实现?就像下面的,我把菜单里面的代码调整一下?
'Syscmd.Filter.FilterByMonth(1)CurrentTable.Filter = "month(" & CurrentTable.Cols(CurrentTable.ColSel).name & ") = 1"