Wenn Sie Code beim Öffnen einer Access-Datenbank ausführen wollen, gibt es zwar keine direkte Möglichkeit wie etwa ein Ereignis beim Öffnen eines Formulars. Es gibt allerdings verschiedene Techniken, mit denen Sie dennoch den Zeitpunkt des Öffnens der Anwendung abfangen und dabei VBA-Code ausführen können. Bisher nutzte man hier vornehmlich die Möglichkeiten über das Makro namens AutoExec und das Startformular, aber es gibt noch eine weitere Option: nämlich über ein benutzerdefiniertes Ribbon. Im vorliegenden Beitrag zeigen wir zunächst, wie Sie über das als Startformular definierte Formular VBA-Code ausführen können.
Neben dem AutoExec-Makro, dessen Einsatz wir im Beitrag Code beim Öffnen der Anwendung: AutoExec (www.access-im-unternehmen.de/1367) beschreiben, gibt es mit dem Startformular noch eine weitere Option.
Dabei gehen wir in dem oben angegebenen Beitrag davon aus, dass wie eine Funktion wie die folgende beim Start der Anwendung aufrufen wollen:
Public Function Startup() MsgBox "Meldung per VBA" End Function
Statt der MsgBox-Anweisung, die hier angegeben ist, können Sie die beim Start Ihrer Anwendung notwendigen Anweisungen einfügen.
Startformular erstellen
Wie aber können wir diese VBA-Funktion nun mithilfe eines Formulars aufrufen Dazu erstellen wir als Erstes einmal das benötigte Formular und speichern es unter dem Namen frmStartup.
Dann legen Sie für das Ereignis Bei Laden des Formulars den Wert [Ereignisprozedur] fest und klicken auf die Schaltfläche mit den drei Punkten (…), um die Ereignisprozedur im Klassenmodul des Formulars anzulegen (siehe Bild 1).
Bild 1: Das Startformular
Im VBA-Editor erscheint die Prozedur, die wir wie folgt ergänzen:
Private Sub Form_Load() Call Startup End Sub
Diese Prozedur ruft nun beim Laden des Formulars unsere Startfunktion auf. Das testen wir, indem Sie das Formular in der Formularansicht anzeigen. Dies sollte zuerst die Meldung anzeigen und erst nach dem Schließen der Meldung das Formular.
Formular als Startformular festlegen
Wie sorgen wir nun dafür, dass das Formular beim Starten der Anwendung geöffnet wird Dazu öffnen wir mit dem Ribbonbefehl Datei|Optionen den Dialog Access-Optionen, wechseln dort zum Bereich Aktuelle Datenbank und stellen unter Formular anzeigen den Namen des beim Start zu öffnenden Formulars ein (siehe Bild 2).
Ende des frei verfügbaren Teil. Wenn Du mehr lesen möchtest, hole Dir ...
den kompletten Artikel im PDF-Format mit Beispieldatenbank
diesen und alle anderen Artikel mit dem Jahresabo