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

首先，我们要在工作表没有处于被保护状态前设定好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

---

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