Office: (Office 2013) Makros ersetzen

Hallo Forum,

und da ich gerade hier bin... *wink.gif*

Zu Anfang meiner Entwicklung mit Access habe ich fleißig Makros verwendet (hat das schlaue Buch empfohlen). Inzwischen weiß ich, dass ich die Makros viel besser durch VBA-Code ersetzen kann. Wo immer ich in existierenden Projekten jetzt auf ein Makro stoße ersetze ich es also durch VBA-Code.

Aber:
Gibt es eine Möglichkeit, alle Makros in einem Access-Projekt zu suchen bzw. ein Access-Projekt gezielt nach Makros zu untersuchen, um wirklich alle dieser kleinen Monster durch VBA-Code ersetzen zu können? Ich würde gern sicher sein, dass sich kein Makro mehr im Code versteckt.

Vielen Dank im Voraus für alle Hinweise und beste Grüße
Michael

:)

 

Welche Makros es gibt, dürfte Dir im Navigationsbereich ersichtlich sein.

Mit Find&Replace von Rick Fisher kannst Du bspw. einfach ermitteln, wo diese verwendet werden.
DataMacros (seit Acc2010) haben einen etwas anderen Stellenwert (Objekte des Backends), dürften aber auch noch recht selten in der Verwendung sein. Diese findest Du in den Tabellendefinitionen.

 

Das gilt nicht für die "Embedded Macros", die seit Access 2007(?) standardmäßig für Ereignisse erzeugt werden, wenn man den "Macro Builder" auswählt, um eine Ereignisbehandlung zu erstellen. Diese Makros werden in das Form (oder Report) eingebettet und sind in der Access GUI weitestgehend unsichtbar, wenn man sie nicht explizit über den gleichen Weg zu Bearbeitung öffnet.

Dein Hinweis auf Find&Replace ist aber auch für diese Problematik eine gute Lösung. Suchbegriff: "[Embedded Macro]"
Die Treffer wird man dann allerdings dennoch manuell überarbeiten müssen...

 

Es geht ausschließlich um die Ereignis-Makros.

Find&Replace habe ich ausprobiert, bin aber nicht zum Erfolg gekommen. Möglicherweise ist die gewünschte Funktion auf die Kauf-Version beschränkt? Habe wie angegeben gesucht, aber es wurde kein Ergebnis / Log erstellt.

Schade, aber auch kein Weltuntergang. Die Makros sind auf einige wenige Buttons beschränkt (Speichern, PDF erstellen, Schließen). Gründlich wie ich bin ;-) hätte ich halt gern eine Prüfung gehabt, dass ich auch wirklich alle erwischt habe. Das manuelle Ersetzen durch VBA-Code ist das geringste Problem.

Danke für alle Hinweise
Michael

 

Was Dir immer als eigenständige Maßnahme bleibt, ist, Objekte bzw. besser deren Definitionen per SaveAsText zu exportieren. Die entstehenden Textdateien können dann nach sinnigen Stichworten durchsucht werden. Mit etwas Programmierung dazu kann man das auch komfortabel und automatisch gestalten.

 

Hallo Eberhard,

diese Möglichkeit kenne ich noch gar nicht! Wie mache ich das?

Viele Grüße
Michael

 

Das kann ich nachvollziehen. Erstaunlich, dass Find&Replace offenbar nicht in den Ereignis-Properties sucht. Vielleicht wird aber auch dieser Text als "zu generisch" bei der Suche nicht berücksichtigt.

Verwende als Suchbegriff mal "UserInferaceMacro". Das sollte in jedem Macro-XML-Text im Embedded-Macro-Container gefunden werden. Der Text in "Object Name" des Suchergebnisses sollte aussagefähig genug sein, um das jeweilige Makro zu lokalisieren.

 

Im Objektkatalog müsstest Du zur Anzeige per Kontextmenü "Verborgene Elemente anzeigen".
Beispielhaft für ein bestimmtes Formular:
Code:

 

Herzlichen Dank, Eberhard.

Wenn ich alle Formulare und Reports in einer Schleife durchlaufe erhalte ich sämtliche Exporte mit einem Klick. In den Textdateien suche ich dann nach einem String "EmMacro", der mir das Access-Macro verrät. Bisschen Fleißarbeit, aber es führt zum Ziel.

 

Das sollte natürlich UserInterfaceMacro heißen!