excel中利用VBA在受到保护的工作表中进行自动筛选

当在工作表中设置了自动筛选，而在保护工作表时没有选择允许“使用自动筛选”，那么自动筛选功能在保护工作表后无法使用。如果需要在不解除工作表保护的情况下能够使用自动筛选，可以用下面的VBA代码：

1.按Alt+F11，打开VBA编辑器，在“工程”窗口中选择相应的工作表，在右侧的代码窗口中输入下面的代码：

Sub AutoFilterInProtectedSheet()
With ActiveSheet
.EnableAutoFilter = True
.Protect DrawingObjects:=True, _
contents:=True, Scenarios:=True, _
UserInterfaceOnly:=True
End With

由WPS之家(wps.qiangguoshuo.com)收集的该篇文章内容来源于网络，希望能为广大朋友提供帮助。

2.让受保护的工作表处于活动状态，运行代码。

如想转载该文章请注明出处：强国说学习-qiangguoshuo.com

转载声明：本站发布文章及版权归原作者所有，转载本站文章请注明文章来源！

本文链接：https://www.qiangguoshuo.com/excel/42339.html