Remove Save Button from toolbar
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.
Then, what is the code to get it back?
Thanks a lot,
TT
.
|