habe mir gerade eben folgenden Code, um Menü- und Symbolleiste auszublenden, aus dem Archiv in eine Excelvorlagendatei (xlt) eingebaut ...
Option Explicit
Dim cb As CommandBar
Private Sub Workbook_Activate()
For Each cb In Application.CommandBars
cb.Enabled = False
Next
End Sub
Private Sub Workbook_Deactivate()
For Each cb In Application.CommandBars
cb.Enabled = True
Next
End Sub
Zusätzlich versuche ich erfolglos noch die Bearbeitungs- und Statusleiste auszublenden.Die Leisten sollten nur in dieser Datei ausgelendet werden, beim öffnen einer anderen Datei sollte wieder alles da sein.
Wer kann mir helfen? Danke schon mal im Voraus
Gruß Bernd