首页 > Excel专区 > Excel函数 >

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

Excel函数 2022-02-14 21:56:31

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

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

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

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


标签: 代码保护工作筛选excel函数

office教程网 Copyright © 2016-2020 http://www.office9.cn. Some Rights Reserved. 苏ICP备20040415号-9