EnableOutlining Property Example
This example enables outlining symbols on a protected worksheet.
ActiveSheet.EnableOutlining = True ActiveSheet.Protect contents:=True, userInterfaceOnly:=True