londy
08-16-2007, 07:05 AM
Hi,
I have tried to disable save and save as options for a specific file by using this code under Workbook_Open event (private)
With Application.CommandBars("File")
.Controls(4).Enabled = False
.Controls(5).Enabled = False
End With
Application.CommandBars("Standard").Controls(3).Enabled = False
Unfortunately the code applies to all of the workbooks I open while the coded workbook is opened
I tried to replace the Application object with ThisWorkbook but I get an error...
I have tried to disable save and save as options for a specific file by using this code under Workbook_Open event (private)
With Application.CommandBars("File")
.Controls(4).Enabled = False
.Controls(5).Enabled = False
End With
Application.CommandBars("Standard").Controls(3).Enabled = False
Unfortunately the code applies to all of the workbooks I open while the coded workbook is opened
I tried to replace the Application object with ThisWorkbook but I get an error...