Menüpunkt ausblenden unabhängig v. Sprachversion
27.08.2007 10:23:00
Max
ich habe in meiner Datei alle Registerkarten ausgeblendet.
Dem User ist somit gezwungen meine Navigations-Buttons zu nutzen.
Da manche Blätter nicht allen Usern zugägnlich sind, habe ich manchmal noch eine Userform mit Passworteingabe eingebaut.
Nun möchte ich in jedem Fall verhindern dass ein User die Blattregisterkarten manuell wieder einblenden kann. Bspw. über Menü - Extras - Optionen.
Hier mein Code, der gut funktioniert:
Private Sub Worksheet_Activate()
'Deaktiviert den Menüpunkt "Extras"
CommandBars("Worksheet Menu Bar"). _
Controls("Tools").Enabled = False
End Sub
Wie ihr seht, arbeite ich mit einer englischen Excel-version.
Das Makro wird vorraus. nicht bei anderen Sprachversionen laufen.
Gibt es hierfür einen allgemeineren Befehl, der unabhängig von der jeweiligen Excel-Version ist?
Vielen Dank schon mal!
Max
Anzeige