PDA

Vollständige Version anzeigen : Eigene Menuleiste erstellen!


Bolle
27.06.2001, 06:53
Hallo Forum,

ich möchte mir eine eigene Menuleiste erstellen, mit dem Menu "Daten Import"
In dieses benutzerdef. Menu lege ich die Makros
"Automatik" "Automatik Stopp" "Manuel"
ab.
Wie kann ich die Menuleiste so einstellen, wenn "Automatik" ausgewählt wird darf "Manuel" nicht anwählbar sein?

Vorab Danke

Bolle

Birgit Dannenberg
27.06.2001, 08:33
Hier mal ein Beispiel, das Du für Deine Zwecke noch anpassen musst:

' Menüleiste anpassen
Dim cmdBar As CommandBar
Dim cmdBarPuP As CommandBarPopup
Dim cmdBarBtn As CommandBarButton

Set cmdBar = CommandBars.ActiveMenuBar '("mnu_input")
Set cmdBarPuP = cmdBar.Controls("&Datensätze")
Set cmdBarBtn = cmdBarPuP.Controls("Daten e&ingeben")
cmdBarBtn.Enabled = False
Set cmdBarBtn = cmdBarPuP.Controls("Daten &bearbeiten")
cmdBarBtn.Enabled = True


Gruss Birgit