Remove Save Button from toolbar

T

Tommy T

I need to check if the workbook's name is "TT.xls" - if it is, I want to remove the save button from the toolbar.

Then, what is the code to get it back?

Thanks a lot,
TT
 
L

losmac

Sub TestTT()
Dim wb As Workbook

For Each wb In Workbooks
MsgBox wb.Name
If wb.Name = "TT.xls" Then
'commndbars().Controls().Visible = False
Else
'commndbars().Controls().Visible = True
End If
Next wb

End Sub
-----Original Message-----
I need to check if the workbook's name is "TT.xls" - if
it is, I want to remove the save button from the toolbar.
 
Top