Macro not working, trying to make sheets "VeryHidden"

[Badnames]

Can someone take a look and let me know how I can fix the code? Debug shows the problem happening with the first line:

'ActiveWorkbook.Worksheets("P&L").VeryHidden = True'



Here is the code:
-----------------------------------------------------------------------------------

Sub Private_work_hide()

' This macro hides all the P&L and Cost sheets. Not used by users but for troubleshooting purposes
' stop_looking
ActiveWorkbook.Worksheets("P&L").VeryHidden = True
ActiveWorkbook.Worksheets("SG&A Lookups").VeryHidden = True
ActiveWorkbook.Worksheets("LCR Final").VeryHidden = True
ActiveWorkbook.Worksheets("Capital Costs").VeryHidden = True
ActiveWorkbook.Worksheets("lkps").VeryHidden = True
ActiveWorkbook.Worksheets("Output").VeryHidden = True
End Sub

 

[Datsmart]

Change "VeryHidden" to "xlVeryHidden".

 

[VoG]

The syntax is

ActiveWorkbook.Worksheets("P&L").Visible = xlSheetVeryHidden

 

[Badnames]

Thanks for the response, I'll give it a go.

 

[Badnames]

Works great. Thanks