ich bin neu hier. Ich zerbreche mir seit Tagen den Kopf. Warum commandbars bei mir keine Wirkung zeigt.
Option Explicit
'Deaktivierung aller "Blatt löschen" bei Aktivierung des Sheet
Private Sub Worksheet_Activate()
CommandBars.FindControl(ID:=847).Visible = False
End Sub
'Aktivierung aller "Blatt löschen" bei Deaktivierung des Sheet
Private Sub Worksheet_Deactivate()
CommandBars.FindControl(ID:=847).Visible = True
End Sub
Ich nutze Win7 und Excel 2013Kann mir jemand helfen?
LG Bert