in einer bestehenden Datei wurden beim öffnen diverse Menüpunkte ausgeblendet. Dieses Modul mit Auto_open habe ich gelöscht.
Wenn ich nun Excel starte (neue Datei) ist der Menüpunkt "Einblenden..." in Format / Blatt gegraut. Ich habe diverse Versuche unternommen den Punkt wieder zu aktivieren:
_________________________________________________
Private Sub Einblenden_einblenden
CommandBars("Worksheet Menu Bar").Controls("Format").Controls("Blatt").Controls("Einblenden.. _
.").Enabled = True
End Sub
' Anmerkung: Das oben geannte Makro funktioniert bei Menüpunkt "Ausblenden" nur bei "Einblenden" nicht"
_________________________________________________
Sub Alle_Unterpunkte_in_format_aktivieren()
Dim Ctrl As CommandBarControl
For Each Ctrl In Application.CommandBars("Format").Controls
Ctrl.Enabled = True
Next Ctrl
End Sub
_______________________________________________
'Sub ResetMenuBars()
With Application.CommandBars("Worksheet Menu Bar")
.Enabled = True
.Visible = True
End With
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
End Sub
_______________________________________________
Sub ResetMenuBars()
Dim oBar As CommandBar
For Each oBar In Application.CommandBars
If oBar.Visible Then
If oBar.BuiltIn Then
oBar.Reset
End If
End If
Next oBar
End Sub
_______________________________________________
Zurücksetzen der Menüleiste über Extras Anpassen zurücksetzten geht nicht
_______________________________________________
Löschen der Excel.xlb Datei geht auch nicht
_______________________________________________
Für einen Lösungsvorschlag wäre ich sehr dankbar.
Ansonsten bleibt nur noch ne Excel-Neuinstallation.
Gruß
Jörg