<\/p>\n
Das Codefenster ist das Herzstück des VBA-Editors. Hier schreibst, bearbeitest und liest Du den gesamten Code Deiner Module, Klassenmodule oder Formulare. Es ist der zentrale Ort, an dem Deine Logik entsteht und Deine Projekte zum Leben erweckt werden. Hier kannst Du den enthaltenen Code debuggen, um zu untersuchen, ob alles wie gewünscht funkioniert. Und hier ist der Ort, an dem Du dafür sorgst, dass Dein Code gut lesbar und strukturiert ist. Du kannst den enthaltenen Code nutzen, um ihn automatisiert bei Benutzeraktionen wie dem Anklicken eines Buttons oder nach Eingaben in Textfelder aufzurufen oder Du programmierst einfach Prozeduren, die bestimmte Aufgaben für Dich erledigen.<\/p>\n
Wenn Du ein jüngfräuliches VBA-Projekt hast, was zum Beispiel direkt nach dem Anlegen einer neuen Access-Datenbank der Fall ist, gibt es noch keine Module im VBA-Editor – folglich können wir dann auch noch kein Codefenster anzeigen.<\/p>\n
Sprich: Um überhaupt ein Codefenster anzuzeigen, musst Du zuerst einmal ein Modul anlegen. Das erledigst Du am einfachsten mit dem Menübefehl Einfügen|Modul <\/b>oder, wenn Du fortgeschrittener bist und bereits mit Klassenmodulen arbeitest, mit Einfügen|Klassenmodul<\/b>.<\/p>\n
Eine weitere Alternative, um ein Modul zu erstellen, ist das Anlegen einer Ereignisprozedur für ein Formular oder einen Bericht oder eines der enthaltenen Steuerelemente.<\/p>\n
Dazu öffnest Du beispielsweise ein Formular in der Entwurfsansicht, fügst eine Schaltfläche hinzu, wählst für die Ereigniseigenschaft Beim Klicken <\/b>den Wert [Ereignisprozedur] <\/b>aus und klickst dann auf die Schaltfläche mit den drei Punkten (siehe Bild 1).<\/p>\n
Bild 1: Anlegen einer Ereignisprozedur<\/p>\n Danach erscheint automatisch der VBA-Editor und zeigt direkt das Klassenmodul zu diesem Formular an, in dem Du alle Ereignisprozeduren und weitere Routinen einfügst, die inhaltlich zu diesem Formular gehören (siehe Bild 2). Du siehst hier auch direkt, dass im Bereich Projekt-Explorer <\/b>ein neuer Eintrag für das Klassenmodul namens Form_frmBeispiel <\/b>hinzugefügt wurde.<\/p>\n Bild 2: Die automatisch angelegte Ereignisprozedur<\/p>\n Die Ereignisse und Prozeduren in diesen Klassenmodulen kann man allerdings nie direkt ausführen, sondern man muss tatsächlich die zum Ereignis führende Aktion durchführen – in diesem Fall ein Klick auf die entsprechende Schaltfläche.<\/p>\n Wenn Du Code schreiben möchtest, den Du direkt ausführen können willst, benötigst Du ein Standardmodul, das Du mit Einfügen|Modul <\/b>hinzufügst. Im Gegensatz zum Klassenmodul eines Formulars oder Berichts, die fest vorgegebene Bezeichnungen haben, wird das neue Standardmodul einfach Modul1 <\/b>genannt – weitere Module erhalten die Namen Modul2<\/b>, Modul3 <\/b>und so weiter. Da dies wenig aussagekräftig ist, benennst Du neue Module am Besten direkt um. Unser Modul mit Beispielen zu diesem Artikel nennen wir etwa mdlBeispiele<\/b>. Wir verwenden für Standardmodule in der Regel das Präfix mdl <\/b>(für Module) und cls <\/b>(für Klassenmodule).<\/p>\n In jedem Modul findest Du ganz oben die folgende Anweisung:<\/p>\n Diese gibt an, wie standardmäßig Vergleichsoperationen durchgeführt werden. Insgesamt gibt es drei verschiedene Optionen:<\/p>\n Die Zeile Option Explicit <\/b>finden wir nicht standardmäßig in jedem Modul.<\/p>\n Das sollte allerdings der Fall sein, denn mit dieser verhindern wir, dass im Modul Variablen verwendet werden, die nicht deklariert sind. Ist Option Explicit<\/b> gesetzt, werden nicht deklarierte Variablen bei Ausführen von Code oder auch beim Aufruf von Debuggen|Kompilieren von … <\/b>wie in Bild 3 angezeigt.<\/p>\n Bild 3: Fehler beim Verwenden einer nicht deklarierten Variablen<\/p>\n Ist diese nicht vorhanden, sind zwei Schritte zu erledigen:<\/p>\n Bild 4: Automatisches Hinzufügen der Zeile Option Explicit zu jedem neuen Modul<\/p>\n<\/ul>\n Es gibt noch eine weitere Option-Anweisung mit dem Schlüsselwort Base<\/b>. Diese sieht beispielsweise wie folgt aus:<\/p>\n Dies bedeutet, dass zum Beispiel in Arrays der Wert 0 <\/b>als untere Grenze verwendet wird. Dies ist übrigens auch die Standardeinstellung, daher kann man Option Base <\/b>weglassen, wenn man nicht den Wert 1 <\/b>nutzen möchte.<\/p>\n Mit der folgenden Anweisung legen wir den Wert 1 <\/b>als untere Grenze fest:<\/p>\n Wenn wir nun ein Array wie folgt deklarieren, lauten die untere und die obere Grenze 1 <\/b>und 5 <\/b>statt 0 <\/b>und 5 <\/b>wie bei Option Base 0<\/b>.<\/p>\n Danach kann das Programmieren losgehen. Wir verwenden zunächst ein Standardmodul, weil wir hier die eingegebenen Prozeduren direkt ausführen können.<\/p>\n Für eine einfache Prozedur, die eine Meldung ausgibt, reichen die folgenden Zeilen:<\/p>\n Wenn wir diese Prozedur ausführen wollen, haben wir verschiedene Möglichkeiten. Alle erfordern das Platzieren der Eingabemarke innerhalb der Prozedur:<\/p>\n Bild 5: Ausführen einer Prozedur per Symbolleisten-Schaltfläche<\/p>\n Danach wird die Prozedur ausgeführt und gibt in diesem Fall ein einfaches Meldungsfenster aus.<\/p>\n Damit der Code gut lesbar ist, gibt es einige Grundregeln:<\/p>\n Dies schauen wir uns in den folgenden Abschnitten genauer an.<\/p>\n Das Einrücken von Anweisungen ist essenziell für die Lesbarkeit von Code. Ohne Einrückung sollten nur die folgenden Elemente platziert werden:<\/p>\n Alle Anweisungen, die sich innerhalb einer Prozedur befinden, werden standardmäßig um vier Leerzeichen nach rechts eingerückt:<\/p>\n Wenn wir mit If…Then<\/b>-Bedingungen arbeiten, rücken wir die in den einzelnen Blöcken enthaltenen Anweisungen um zusätzliche vier Zeichen ein:<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>![\"Anlegen](\"..\/tl_files\/images\/pic_689_001.png\")
<\/a><\/p>\n<\/a><\/p>\nDie Anweisung Option Compare Database<\/h2>\n
Option Compare Database<\/span><\/pre>\n\n
Die Anweisung Option Explicit<\/h2>\n
<\/a><\/p>\n\n
<\/a><\/p>\nDie Anweisung Option Base<\/h2>\n
Option Base 0<\/pre>\n
Option Base 1<\/pre>\n
Code schreiben<\/h2>\n
Public Sub <\/span>Beispielmeldung()\r\n MsgBox<\/span> \"Hallo Welt\"\r\nEnd Sub<\/span><\/pre>\nAusführen von Prozeduren in Standardmodulen<\/h2>\n
\n
<\/a><\/p>\nStrukturieren des Codes<\/h2>\n
\n
Anweisungen sinnvoll einrücken<\/h2>\n
\n
Public Sub <\/span>Beispielmeldung()\r\n MsgBox<\/span> \"Hallo Welt\"\r\nEnd Sub<\/span><\/pre>\nPublic Sub <\/span>Bedingung()\r\n Dim <\/span>lngZahl As Long<\/span><\/span>\r\n lngZahl = InputBox(\"Gib eine Zahl ein.\")\r\n If <\/span>lngZahl < 5 Then<\/span>\r\n MsgBox<\/span> \"Die Zahl ist kleiner als 5.\"\r\n Else<\/span>\r\n MsgBox<\/span> \"Die Zahl ist größer oder gleich 5.\"\r\n End If<\/span>\r\nEnd Sub<\/span><\/pre>\n
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t