Enable outlining in a shared/protected workbook

I would like to know how the following code provided in the Excel Help Best Practice Forums , used to enable outlining on a protected sheet, can be applied to a shared workbook.

Private Sub Workbook_Open()

With Sheet1

.Protect Password:="Secret", UserInterfaceOnly:=True

.EnableOutlining = True

End With

End Sub

After enabling 'Share Workbook' and re-opening the file it presents the following error:

Run-time error '1004':
Method 'Protect' of object '_Worksheet' failed

Can it be modified to allow the outlining of protected sheets when the workbook is shared and the sheet is protected?

Good evening miles827

Originally Posted by miles827

Can it be modified to allow the outlining of protected sheets when the workbook is shared and the sheet is protected?

No. Protection cannot be set, unset or amended whilst the workbook is shared. Existing protection remains in place once sharing is switched on, but that's as far a sharing and protection will integrate.

Look at Excel's help under "Features that are unavailable in shared workbooks".

HTH

DominicB