如何在被保护的工作表（Worksheet）中使用Group Outlining

最新推荐文章于 2021-01-20 12:13:56 发布

勾吴江南

最新推荐文章于 2021-01-20 12:13:56 发布

阅读量2k

点赞数

本文链接：https://blog.csdn.net/TX_OfficeDev/article/details/7872175

版权

Office Development 同时被 3 个专栏收录

134 篇文章 0 订阅

订阅专栏

Excel 2010

25 篇文章 0 订阅

订阅专栏

VBA

23 篇文章 1 订阅

订阅专栏

首先，我们要在工作表没有处于被保护状态前设定好Outlining Group。如图：

然后运下以VBA工程来保护这个Worksheet。

Sub test()
    Dim xlSheet As Worksheet
    
    Set xlSheet = ActiveWorkbook.ActiveSheet
    
    xlSheet.Protect "[你的密码]", UserInterfaceOnly:=True
    
    xlSheet.EnableOutlining = True
    xlSheet.EnableAutoFilter = True
    
    Set xlSheet = Nothing
End Sub

欢迎访问《许阳的红泥屋》