ich möchte in den BuiltIn - Menüpunkten von meiner Anwendung nach dem Namen des Punktes "Ganzer Bildschirm" suchen, um diesen eneabled = false setzen zu können. Ich habe damit begonnen, eine For-Each-Next-Schleife (siehe unten) zu schreiben, diese gibt mir aber permanent Laufzeitfehler. Was muss ich anders machen ??
Vielen Dank für Eure Hilfe
Gruß
Sub MenuControls()
Dim CBB As CommandBarButton
For Each CBB In ActiveWorkbook.CommandBars
If CBB.BuiltIn = True Then
If CBB.Caption = "Ganzer Bildschirm" Then
CBB.Enabled = False
End If
End If
Next CBB
End Sub