Hi,
I have outline on three protected worksheets in a workbook, and I want other users to be able to collapse and expand the outline while the worksheets are protected. I entered the following code (which works fine):
Option Explicit
Sub auto_open()
With Worksheets("REPORT1")
.Protect Password:="test", userinterfaceonly:=True
.EnableOutlining = True
End With
End Sub
I then try the following (but it's not working):
Option Explicit
Sub auto_open()
With Worksheets("REPORT1")
With Worksheets("REPORT2")
With Worksheets("REPORT3")
.Protect Password:="test", userinterfaceonly:=True
.EnableOutlining = True
End With
End Sub
Any help, please?
Thank you,
Gos-C
Bookmarks