作者:iamlaosong
用VBA程序处理Excel数据文件,用户的数据文件有时处于自动筛选模式,往往导致数据处理不正确,为此,需要检测工作表是否处于该模式,如果是,则去掉自动筛选,语句如下:
If ActiveSheet.AutoFilterMode = True Then Selection.AutoFilter
这个语句一般只用于去掉自动筛选,虽然Selection.AutoFilter也可以加上自动筛选,但筛选位置却可能在当前单元格处,所以要注意,加自动筛选前,现将单元格定位到字段标题处,然后用如下语句:
If ActiveSheet.AutoFilterMode = False Then Selection.AutoFilter
如果检测其它非活跃的工作表,可以用下面语句:
If Worksheets("Sheet1").AutoFilterMode = True Then Selection.AutoFilter
时间: 2024-10-13 22:48:56