Office: (Office 2010) Formualrspezifische benutzerdefiniert Menüs

Schreib die Makros in VBA-Funktionen(!) um (Prozeduren lassen sich aus den Menü-/Symbolbuttons nicht aufrufen).
Das hilft auch hier im Forum, da kaum jemand normale Makros (Ausnahme Datenmakros) nutzt.

Die Buttons, die damals automatisch erstellt wurden (z.B. System-ID 1839/Makro ausführen)
musst du neu erstellen, da die ID-Eigenschaft schreibgeschützt ist und nicht per VBA geändert
werden kann.

Empfohlene Vorgehensweise:
Erstelle Neue Menu-/Symbolleisten per Code
Code:

und erstelle für die Leisten neue Buttons, denen du deine Funktionen zuweist.
(Code siehe oben)

Auch wenn ich absoluter Gegner der unsäglichen Ribbons und Anhänger der klassischen
Menü-/Symbolleisten bin, empfehle ich, zumindest in Erwägung zu ziehen, deine Anwendung
auf "Multifunktionsleisten" umzustellen.

PS:
Ich hab inzwischen mein altes Tool (AddIn) mal kurz unter 2010 getestet.
Es ist nicht komplett kompatibel, daher würde ich es ungern hier publik machen,
da mir momentan auch die Zeit fehlt, auftretende Fragen zu beantworten.

 

Ok, mein Dank an alle für vielen Hinweise und speziell Dir, Marsu für die Code-Snippets. Ich glaube ich werd mich mal in der VBA-Programmierung von Menunars versuchen. Scheint mir die einzige Möglichkeit zu sein, an den vorhandenen Bars etwas zu ändern. Muss man dann halt beim Form_Load Ereignis machen, denn ich denke Änderungen durch Code werden wohl nicht permanent sein, oder?

Jetzt kommt ab und zu auch noch die Meldung, ich hätte keine Leserechte an der Tabelle MSysModules. Hat die was mit den MSysCmdbars zu tun?

 

Hallo,

hier ist beschrieben, wie sich auch heute noch formularspezifische Menüs (und Kontextmenüs) per Gruppenmakro erstellen lassen.
Und wenn man die Makros in dieser DB einblendet bzw. in den Navigationsoptionen die Anzeige versteckter Objekte zulässt, lassen sie sich natürlich auch ändern ...

 

Sicher doch. Sowohl beim Erstellen neuer Commandbars wie auch für einzelne
Buttons o.ä., bietet die Add-Methode einen Temporary-Parameter an,
mit dem eingestellt wird, ob die Commandbar/der Button dauerhaft gespeichert
wird oder die Änderung nur bis zum Schließen der Commandbar/Anwendung gültig ist.

Wobei bzw. wann erscheint die Meldung?
Wofür brauchst du die Tabelle MSysModules?

 

\@Marty Mc Fly: Ja, den Artikel kenn ich inzwischen. Das, was man damit zusammenbaut hat sehr wenig Ähnlichkeit mit dem, was ich hier vorgezeigt habe. Leider. Habs auch schon probiert.

@Marsu: Ich brauch die MSysModules-Tabelle für gar nichts. Wusste überhaupt nicht, dass sie existiert und hab keine Ahnung wofür sie gut ist. Die Meldung kommt, wenn ich ein Formular im Entwurfsmodus öffne.
Das heißt... im Moment kommt sie wieder gar nicht. Versteh ich nicht. Letzte Session kam sie jedesmal, wenn ich ein Formular im Entwurfsmodus öffnete...
Echt verrückt.
Ich versuch jetzt mal ein Formular zu erstellen, was die Information über die CommandBars darstellt.

 

Mach dir nicht die Mühe.
Anbei das AddIn Commandbarexplorer.
Es läuft zwar nicht alles wie gewünscht unter Acc2010, aber die
Grundfunktionalität sollte gegeben sein.

Wie immer: für Risiken und Nebenwirkungen der Nutzung ... ich war's nicht *wink.gif*

 

Ok, schau ich mir gleich an.
Hab mir aber schon Mühe gemacht, um den Überblick zu kriegen.
Ist noch nicht voll ausgereift, verschafft mir aber schonmal nen Überblick über die vorhandenen CommandBars und deren Items.
Ich hab die neue DB mal angehängt, wenns interessiert.
Einfach starten und dann das Formular frmCmdBars aufrufen.
Oben werden die vorhandenen Bars aufgelistet.
Klickt man auf einen Namen, werden darunter die enthaltenen Controls aufgelistet.
Klickt man auf nen Control, werden daneben ein paar dessen Eigenschaften angezeigt. Ist noch nicht vollständig, aber mal ein Anfang.
Ich hab dafür einiges Deines Codes verwendet, Marsu. Danke dafür.

Wenn ich bei meinem Formular vom Run-Modus in den Entwurfs-Modus schalte, kommt oft diese ominöse Meldung, von der ich schon berichtet habe...
Im Anhang nochmal die DB mit meinen neuesten Ergüssen.

 

Äh.... wie arbeitet man mit diesem APRO Dingens, Marsu?
Ich lande irgendwie immer im Task-Manager und beende die Anwendung.... *grummel*
Muss ich das Add-In irgendwie der vorhandenen Datenbak zufügen?

 

Das AddIn entpacken.
Starte eine neue DB oder deine Anwendung mit der Shift-Taste.
Irgendwo im Standard-Ribbons kannst du den Addin-Manager aufrufen
(Reiter Erstellen? hab hier gerade nur ein Acc03). AddIn Installieren
und über den AddIn-Manager aufrufen/starten.

 

Jaaa. Habs hingekriegt. Das ist ja mal zeimlich genau das, was ich wollte. Danke, Marsu. Jetz krieg ich einigermaßen die Kontrolle über diese CommandBars.
Zumindest hab ich jetzt mal kapiert, wie sie funktionieren und was sie überhaupt sind.
Ich hab in meinem Testprogramm nun versucht die Picture-Eigenschaft auszulesen und darzustellen, aber es scheint kein geeignetes Steuerelement, wie die VB6 PictureBox zu geben, dessen Picture-Eigenschaft ich die Picture-Eigenschaft eines der CommandBarButtons zuweisen kann...

 

Wenn du auf Antworten oder Tipps hoffst, solltest du deinen Code inkl. evtl. Fehlermeldung ... zeigen.

[Edit]
Wenn du das Access Image-Steuerelement verwendest, kann das nicht funktionieren,
da dessen Picture-Eigenschaft vom Typ String ist und den Bildpfad zu einer Datei aufnimmt.
Die Picture-Eigenschaft eines Commandbarbuttons ist dagegen vom Typ IPictureDisp.
[/Edit]

BTW: das Pic wird doch im Listview des Commandbarexplorers angezeigt,
reicht dir das nicht?

 

Ja, schon, aber ich hätte es gerne selber hingekriegt. Du weißt ja sicher, wie das ist. ;-)

Schön. Jedenfalls werd ich als Nächstes versuchen, die vorhanden Bars zu verändern.
Es scheint, wenn kein OnAction definiert ist, wird das Macro ausgeführt, das als "Parameter" angegeben ist. Eine geeignete Überbrückung dessen scheint mir, in OnAction eine VBA-Routine anzugeben und das Makro zu entfernen.
Ich werd das morgen denn mal probieren.

Nochmals vielen Dank. Mir scheint, ich bin jetzt eine ganze Portion schlauer, was diese Menubars anbelangt. Schauen wir mal, wo mich das noch hinführt. :-D

Ich werde auch meinen neuerlichen Code gerne posten.