<\/p>\n
Ohne Ereignisprozeduren läuft nicht viel in Access-Anwendungen: Wer Klicks auf Schaltflächen, Datensatzwechsel, Öffnungs- oder Schließvorgänge von Formularen mit Funktionen hinterlegen möchte, verwendet am besten die für diesen Zweck vorgesehenen Ereigniseigenschaften in Kombination mit entsprechenden VBA-Prozeduren. Wir zeigen Ihnen, wie Sie schnell zu Ihrer ersten Ereignisprozedur kommen und was es dabei zu beachten gilt.<\/b><\/p>\n
Grundlagen<\/p>\n
Die meisten Beitrag von Access im Unternehmen werden Ihnen völlig unverständlich bleiben, wenn Sie noch nie mit Ereignisprozeduren gearbeitet haben. Daher möchten wir einmal grundlegend erläutern, was es mit Ereignisprozeduren auf sich hat und welche Möglichkeiten sich hier bieten.<\/p>\n
In einem weiteren Beitrag setzen wir dann auf dem hier gewonnenen Wissen auf und gehen dann in die Vollen – Sie werden dann einige Tricks und Kniffe kennen lernen, die den Aufbau Ihrer Anwendungen merklich optimieren werden.<\/p>\n
Ereignisprozeduren sind im Prinzip nichts weiter als herkömmliche Routinen, die den enthaltenen Code ausführen. Der Unterschied etwa zu einer üblichen Function- oder Sub-Prozedur ist, dass Ereignisprozeduren nicht durch einen herkömmlichen Aufruf von anderer Stelle gestartet werden. Dies ist zwar auch möglich, hauptsächlich jedoch werden Ereignisprozeduren durch fest definierte Ereignisse ausgelöst.<\/p>\n
Dies kann beispielsweise ein Klick auf eine Schaltfläche, die Auswahl eines Kombinationsfeldeintrags, das Öffnen eines Formulars oder auch das Wechseln des Datensatzes im Formular sein.<\/p>\n
Ereignisse sind immer für bestimmte Objekte definiert, die Access Ihnen ganz einfach über das Eigenschaftsfenster des jeweiligen Objekts in Kombination mit dem VBA-Editor zugänglich macht.<\/p>\n
Dazu muss das jeweilige Objekt entweder markiert sein oder Sie wählen einfach das gewünschte Objekt über das oben im Eigenschaftsfenster befindliche Kombinationsfeld aus.<\/p>\n
Wenn Sie einem Formular eine Schaltfläche hinzufügen, finden Sie in der Entwurfsansicht im Bereich Ereignisse <\/b>des Eigenschaftsfensters eine Reihe von Einträgen, die allesamt dem Festlegen von Ereignissen dienen (siehe Bild 1). Wenn der Benutzer nun auf diese Schaltfläche klickt, schaut Access – vereinfacht gesagt – nach, ob für einen Mausklick ein Ereignis festgelegt wurde.<\/p>\n
![\"pic001.png\"](\"..\/fileadmin\/_temp_\/2009_05\/Ereignisprozeduren-web-images\/pic001_opt.jpeg\")
<\/p>\n
Bild 1: Die Ereigniseigenschaften einer Schaltfläche<\/span><\/b><\/p>\n Dies geschieht in der Eigenschaft Beim Klicken<\/b>, wo Sie mehrere Optionen haben: Sie können dort festlegen, dass eine Ereignisprozedur, eine herkömmliche Funktion oder ein Makro ausgeführt werden soll. Um es kurz zu machen: Nur die Ereignisprozedur bietet den vollen Komfort, weshalb wir auf Funktionen und Makros als Ziel einer Ereigniseigenschaft hier nicht eingehen.<\/p>\n Die möglichen Werte für Ereigniseigenschaften schränken Sie damit merklich ein: Sie können dort lediglich noch den Wert [Ereignisprozedur] <\/b>eintragen – oder aber das englische Pendant [Event Procedure]<\/b>, was in der deutschen Version aber gleich in [Ereignisprozedur] <\/b>umgewandelt wird.<\/p>\n Ein kleiner Hinweis: Im Beitrag Ereignisprozeduren implantieren <\/b>(Shortlink 686) erfahren Sie, wie Sie diese Eigenschaft per VBA-Code setzen. Sie sollten dort immer die englische Variante verwenden – zumindest, wenn auch nur die geringste Chance besteht, dass der Code einmal auf einem anderssprachigen System laufen soll.<\/p>\n Nun besitzt die Eigenschaft Beim Klicken <\/b>zwar den Wert [Ereignisprozedur]<\/b>, beim Klick auf die Schaltfläche tut sich aber nichts. Das ist auch klar: Immerhin gibt es ja noch gar keine Ereignisprozedur. Diese muss bestimmten Konventionen gehorchen, die sich jedoch auf die Deklarationszeile der Prozedur beschränken und sich auf den Namen und die nötigen Parameter beziehen. In Abhängigkeit vom Objekt, welches das Ereignis auslöst, und vom Ereignis selbst besitzt die Ereignisprozedur unterschiedliche Parameter.<\/p>\n Zum Glück brauchen Sie die nicht jedes Mal abzutippen oder gar auswendig zu kennen, denn Access bietet gleich mehrere Möglichkeiten, den Prozedurrumpf automatisch anlegen zu lassen.<\/p>\n Klicken Sie nach dem Markieren der gewünschten Ereigniseigenschaft einfach auf die nun erscheinende Schaltfläche mit den drei Punkten (…) und wählen Sie im Dialog Generator auswählen <\/b>den Eintrag Code-Generator <\/b>aus (siehe Bild 2). Nach einem Klick auf OK <\/b>öffnet Access den VBA-Editor und legt automatisch den Prozedurrumpf der Ereignisprozedur an (siehe Bild 3).<\/p>\n Bild 2: Anlegen einer Ereignisprozedur über den Dialog Generator auswählen<\/span><\/b><\/p>\n Bild 3: Prozedurrumpf einer frisch angelegten Ereignisprozedur<\/span><\/b><\/p>\n <\/p>\n Wo aber befinden wir uns nun Jede Access-Datenbank besitzt ein eigenes VBA-Projekt, dessen Aufbau und Inhalt mit der .mdb<\/b>– oder .accdb<\/b>-Datei gespeichert wird. Das VBA-Projekt kann Standardmodule, unabhängige Klassenmodule und Klassenmodule von Formularen und Berichten enthalten.<\/p>\n Das, was Access beim Anlegen der ersten Ereignisprozedur eines Formulars anzeigt, ist ein neues Formularklassenmodul. Dessen Name besteht immer aus dem Ausdruck Form_ <\/b>und dem Namen des Formulars aus dem Datenbankfenster beziehungsweise Navigationsbereich (unter Access 2007). Wenn Sie ein leeres Klassenmodul anlegen möchten, das die Ereignisprozeduren eines Formulars enthält, gibt es dazu über die Benutzeroberfläche nur einen einzigen Weg: Sie müssen die Eigenschaft Enthält Modul <\/b>des Formulars auf Ja <\/b>einstellen.<\/p>\n Zurück zu unserer frisch angelegten Prozedur: Im Rumpf fügen Sie die Anweisungen ein, welche die Prozedur ausführen soll, zum Beispiel eine einfache MsgBox<\/b>-Meldung:<\/p>\n Alternativ können Sie für die Ereigniseigenschaft auch gleich den Eintrag [Ereignisprozedur] <\/b>auswählen und auf die Schaltfläche mit den drei Punkten klicken, um den Prozedurrumpf anzulegen. Noch einfacher wird es, wenn Sie die Eigenschaft Immer Ereignisprozeduren verwenden <\/b>in den Access-Optionen einstellen (bis Access 2003: Menüeintrag Extras|Optionen<\/b>, Registerkarte Formulare\/Berichte<\/b>; Access 2007: Office-Menü, Schaltfläche Access-Optionen<\/b>, Bereich Objekt-Designer|Formulare\/Berichte<\/b>).<\/p>\n Sie brauchen dann im Eigenschaftsfenster nur noch die Ereigniseigenschaft zu markieren und auf die Schaltfläche mit den drei Punkten zu klicken – der Eintrag [Ereignisprozedur] <\/b>wird dann automatisch festgelegt und die Prozedur angelegt.<\/p>\n Hier tragen Sie nun den Code ein, der beim Anklicken der Schaltfläche ausgelöst werden soll. Die zweite Variante zum Anlegen einer Ereignisprozedur finden Sie gleich im VBA-Editor: Hier wählen Sie im Kombinationsfeld oben links im Codefenster das Element aus, welches das Ereignis auslösen soll, und stellen mit dem rechten Kombinationsfeld den Typ des Ereignisses ein. Wenn Sie noch keine Ereignisprozedur für ein Element angelegt haben, erstellt der VBA-Editor automatisch eine Standardprozedur, die Sie aber wieder löschen können, wenn Sie diese nicht verwenden wollen.<\/p>\n Benennung der Ereignisprozedur<\/b><\/p>\n Der Name der Ereignisprozedur setzt sich – das werden Sie sicher längst bemerkt haben – aus dem Objektnamen, einem Unterstrich (_<\/b>) und der Art der Ereignisprozedur zusammen. Die Prozedur, die beim Öffnen eines Formulars ausgelöst wird, heißt dementsprechend Form_Open<\/b>, das Anklicken einer Schaltfläche namens cmdOK <\/b>wird durch eine Ereignisprozedur namens cmdOK_Click <\/b>bedient.<\/p>\n Warum Sie das wissen müssen Nun: Sie werden im Laufe der Zeit Formulare mit einer Menge Ereignisprozeduren füllen, und da ist es sinnvoll, aus dem Namen der Ereignisprozedur ableiten zu können, durch welches Element und bei welcher Aktion das Ereignis ausgelöst wird.<\/p>\n 1 + 1 = 2<\/b><\/p>\n Ebenfalls ist wahrscheinlich deutlich geworden, dass zu einer funktionstüchtigen Ereignisprozedur nicht nur die VBA-Prozedur selbst gehört, sondern auch noch der Eintrag [Ereignisprozedur] <\/b>beziehungsweise [Event Procedure] <\/b>für die entsprechende Ereigniseigenschaft.<\/p>\n Sollten Sie sich einmal wundern, warum ein scheinbar vorhandenes Ereignis nicht ausgelöst wird, kontrollieren Sie also als Erstes den Wert der Ereigniseigenschaft.<\/p>\n Parameter<\/b><\/p>\n Ereignisprozeduren sind den Funktionen oder Makros deshalb vorzuziehen, weil die meisten wichtige Parameter bieten, die Sie während des Ablaufs der Prozedur verwenden oder auch setzen können, um damit den weiteren Verlauf zu beeinflussen. Dies funktioniert beispielsweise mit dem Ereignis Beim Öffnen <\/b>von Formularen. Der Prozedurrumpf sieht so aus:<\/p>\n Wenn Sie den Parameter Cancel <\/b>auf True <\/b>einstellen, geht Access davon aus, dass Sie das Formular nicht öffnen wollen, und schließt das Formular gleich wieder:<\/p>\n Andere Ereignisprozeduren besitzen Parameter, die Ihnen nützliche Informationen liefern. Ein gutes Beispiel ist das Ereignis Bei Maustaste ab <\/b>einer Schaltfläche, deren Ereignisprozedur so aussieht:<\/p>\n Button <\/b>liefert beispielsweise den Wert 1<\/b>, wenn der Benutzer die Schaltfläche mit der linken Maustaste anklickt, und 2<\/b>, wenn die rechte Maustaste für den Klick verantwortlich ist.<\/p>\n Shift <\/b>gibt an, ob der Benutzer beim Klicken eine zusätzliche Taste gedrückt hielt. Die Umschalt-Taste liefert den Wert 1<\/b>, die Strg<\/b>-Taste den Wert 2 <\/b>und die Alt-Taste den Wert 4<\/b>. Bei mehreren gleichzeitig gedrückten Tasten enthält Shift <\/b>die Summe der genannten Zahlenwerte.<\/p>\n X <\/b>und Y <\/b>enthalten die Koordinaten des Mauszeigers zum Zeitpunkt des Mausklicks in Twips.<\/p>\n Ein anderes Beispiel ist die Ereignisprozedur Form_Error<\/b>, die immer dann ausgelöst wird, wenn ein nicht durch eine VBA-Routine ausgelöster Fehler auftritt, während ein Formular den Fokus hat.<\/p>\n Diese Routine liefert als Parameter die Nummer des Fehlers, mit der Sie den Fehler behandeln können, und offeriert einen zweiten Parameter, dem Sie einen Wert mitgeben können, der über die weitere Vorgehensweise entscheidet: So kann trotz Fehlerbehandlung die Standard-Access-Fehlermeldung angezeigt oder aber deren Anzeige unterbunden werden. Dies nur als Beispiel; weitere Informationen zur Fehlerbehandlung finden Sie im Beitrag Fehlersuche und -behandlung mit Access <\/b>(Shortlink 1).<\/p>\n Ereignisprozeduren manuell aufrufen<\/b><\/p>\n Wenn Sie einmal eine Ereignisprozedur aufrufen möchten, ohne dass das Ereignis durch eine entsprechende Aktion ausgelöst wird, können Sie das leicht einrichten.<\/p>\n Dazu schreiben Sie einfach den Namen der Ereignisprozedur in eine leere Zeile, alternativ können Sie auch noch die Anweisung Call <\/b>voranstellen:<\/p>\n Bei Prozeduren, die Parameter anbieten, müssen Sie diese gegebenenfalls im Aufruf unterbringen, etwa so:<\/p>\n Wenn Sie tatsächlich einmal eine Formular- oder Berichtsereignisprozedur manuell aufrufen möchten, müssen Sie eines beachten: Die Prozeduren innerhalb des entsprechenden Klassenmoduls können Sie normalerweise nur von Routinen aus aufrufen, die sich in der gleichen Klasse befinden.<\/p>\n Der Vollständigkeit halber sei erwähnt, wie Sie solche Prozeduren aber auch von außerhalb aufrufen können:<\/p>\n![\"pic002.png\"](\"..\/fileadmin\/_temp_\/2009_05\/Ereignisprozeduren-web-images\/pic002_opt.jpeg\")
<\/p>\n![\"pic003.png\"](\"..\/fileadmin\/_temp_\/2009_05\/Ereignisprozeduren-web-images\/pic003_opt.jpeg\")
<\/p>\nPrivate Sub cmdOK_Click()\r\n MsgBox \"cmdOK angeklickt\"\r\n End Sub<\/pre>\n
Private Sub Form_Open(Cancel As Integer)\r\n End Sub<\/pre>\n
Cancel = True<\/pre>\n
Private Sub cmdOK_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)\r\n End Sub<\/pre>\n
cmdOK_Click\r\nCall cmdOK_Click<\/pre>\n
Call Form_Open(False)<\/pre>\n