<\/p>\n
Eines Tages passiert es jedem: Der Code kompiliert nicht, Access meldet einen Laufzeitfehler oder das Ergebnis ist schlicht falsch. Genau hier kommt das Debugging ins Spiel. Unter Debugging versteht man alle Techniken, mit denen Du Fehler im VBA-Code gezielt aufspüren, analysieren und beheben kannst. Dieser Artikel richtet sich an Einsteiger und zeigt Dir die wichtigsten Debugging-Möglichkeiten, die direkt im VBA-Editor zur Verfügung stehen.<\/p>\n
Die Beispiele dieses Artikels findest Du in der Datenbank VBABasics_DebuggenImVBAEditor.accdb<\/b>.<\/p>\nWas bedeutet Debugging überhaupt?<\/h2>\n
Beim Debugging geht es nicht darum, den Code komplett neu zu schreiben, sondern Schritt für Schritt zu verstehen, was der Code tatsächlich tut.<\/p>\n
Häufig unterscheidet sich dieses tatsächliche Verhalten von dem, was man beim Schreiben im Kopf hatte. Debugging hilft Dir dabei, diesen Unterschied sichtbar zu machen.<\/p>\n
Gerade in Microsoft Access mit vielen Formularen, Ereignissen und Abfragen ist Debugging unverzichtbar, weil Code oft automatisch ausgelöst wird, zum Beispiel beim Öffnen eines Formulars oder beim Klicken auf eine Schaltfläche.<\/p>\n
Alle hier beschriebenen Techniken werden direkt im VBA-Editor eingesetzt. Du öffnest ihn in Access mit der Tastenkombination Alt + F11<\/b>. Dort findest Du nicht nur Deinen Code, sondern auch alle Werkzeuge, die Du für das Debugging benötigst (siehe Bild 1).<\/p>\n
Bild 1: Der VBA-Editor mit Codefenster und Direktbereich<\/p>\n Mit Alt + F11 <\/b>kannst Du auch zum Access-Fenster zurückwechseln. Eine weitere interessante Tastenkombination ist Strg + G<\/b>.<\/p>\n Damit springst Du sowohl vom Access-Fenster als auch bei aktiviertem VBA-Editor direkt in den Direktbereich, der für die Ausgabe von Debug.Print<\/b>-Anweisungen verwendet werden kann.<\/p>\n Besonders wichtig sind für das Debuggen das Direktfenster, Haltepunkte, das schrittweise Ausführen von Code sowie einfache Ausgaben mit Debug.Print<\/b>.<\/p>\n Eine der einfachsten und zugleich effektivsten Debugging-Techniken ist die Ausgabe von Werten mit Debug.Print<\/b>. Mit dieser Anweisung kannst Du Variablen, Ausdrücke oder Texte in das Direktfenster schreiben. Gleichzeitig ist dies die einzige Möglichkeit, um dort Ausgaben zu erzeugen.<\/p>\n Schauen wir uns die folgende kleine Prozedur an. Sie enthält lediglich eine einzige Anweisung, die den Text Hallo in den Direktbereich schreibt:<\/p>\n Eine solche Prozedur starten wir, indem wir die Einfügemarke irgendwo innerhalb der Prozedur platzieren und dann eine der folgenden Aktionen ausführen:<\/p>\n Das Ergebnis siehst Du in Bild 2.<\/p>\n Bild 2: Einfache Ausgabe im Direktbereich<\/p>\n Einfache Ausgaben wie diese helfen Dir bei der Prüfung, ob eine bestimmte Stelle im Code überhaupt durchlaufen wird. In diesem Fall sehen wir klar, dass dies der Fall ist.<\/p>\n Mit Debug.Print <\/b>können wir nicht nur feste Ausdrücke, sondern auch den Inhalt von Funktionen oder Variablen ausgeben.<\/p>\n Und dazu müssen wir die Anweisung gar nicht von einer Prozedur aus ausführen. Wir können Debug.Print <\/b>auch direkt im Direktbereich eingeben und ausführen. Wir können damit zum Beispiel eingebaute VBA-Funktionen ausprobieren.<\/p>\n Die folgende Anweisung, die wir direkt im Direktbereich eingeben und mit der Eingabetaste ausführen, gibt etwa das aktuelle Datum und die aktuelle Uhrzeit aus:<\/p>\n Es gibt sogar eine Kurzform der Debug.Print<\/b>-Anweisung, die wir allerdings nur im Direktbereich selbst nutzen können – das Fragezeichen (?). Hier geben wir die Nummer des Wochentags des aktuellen Datums aus (der zweite Parameter gibt den ersten Tag der Woche an):<\/p>\n Wir können auch noch eine weitere Funktion umschließen, um den Namen des Wochentags zu ermitteln:<\/p>\n Im Code interessiert uns oft, welchen Wert eine Variable zu einem bestimmten Zeitpunkt hat. Im folgenden Beispiel durchlaufen wir eine Schleife und geben den jeweiligen Wert der Schleifenvariablen aus, hier die Werte von 1 <\/b>bis 10<\/b>:<\/p>\n Wir können mit Debug.Print <\/b>auch mehrere Informationen zusammenfassen, zum Beispiel eine Zeichenkette und einen Variablenwert. Wir ändern die Ausgabeanweisung des vorherigen Beispiels wie folgt:<\/p>\n Damit erhalten wir:<\/p>\n Die Verbindung mit dem Kaufmanns-Und (&<\/b>) hängt die auszugebenden Werte unmittelbar aneinander. Wir können stattdessen auch das Komma verwenden:<\/p>\n Dies fügt zwischen die beiden Ausdrücke „Aktueller Wert von i“ <\/b>und i <\/b>ein Tabulator-Zeichen ein und damit einen fest definierten Abstand:<\/p>\n Die nächste Möglichkeit ist die Verwendung des Semikolons (;<\/b>). Dabei werden die Ausdrücke unmittelbar hintereinander ausgegeben.<\/p>\n Manchmal möchte man auch mehrere Informationen in die gleiche Zeile schreiben, aber kann dazu nicht die gleiche Debug.Print<\/b>-Anweisung nutzen.<\/p>\n Angenommen, wir wollen die Werte von i ausgeben, einmal vor und einmal nach einer Rechenoperation. Die folgende Prozedur gibt i <\/b>direkt nach der Deklaration aus und dann noch einmal, nachdem wir den Wert 1 <\/b>addiert haben:<\/p>\n Wenn wir aus Gründen der Übersicht beide Ausgaben in einer Zeile wünschen, können wir hinter der ersten Debug.Print<\/b>-Anweisung das Komma oder das Semikolon setzen.<\/p>\n Dann wird das erste Debug.Print <\/b>nicht mit einem Zeilenumbruch abgeschlossen, sondern wir bleiben in der gleichen Zeile:<\/p>\n Dann erhalten wir das Ergebnis aus Bild 3, wo beide Ausgaben durch das Tabulator-Zeichen getrennt in einer Zeile landen.<\/p>\n Bild 3: Mehrere Debug.Print-Ausgaben in eine Zeile<\/p>\n Leider bietet der VBA-Editor keine einfache Möglichkeit, den Direktbereich zu leeren – wie etwa eine Schaltfläche oder eine Tastenkombination. Am einfachsten gelingt dies daher mit mehreren Tastenkombinationen:<\/p>\n Wir können die Debug.Print-Funktion zwar in eine Funktion einbauen, um den aktuellen Wert von Variablen zu erhalten. Beispiel:<\/p>\n Damit erhalten wir im Direktbereich:<\/p>\n Nun wollen wir allerdings nicht alle Ausgaben erhalten, sondern vielleicht nur einen Wert zu einem bestimmten Zeitpunkt. Dabei helfen uns Haltepunkte.<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>![\"Der](\"..\/tl_files\/images\/pic_684_001.png\")
<\/a><\/p>\nDebug.Print – Werte sichtbar machen<\/h2>\n
Public Sub <\/span>Debugging()\r\n Debug.Print<\/span><\/span> \"Hallo\"\r\nEnd Sub<\/span> <\/pre>\n\n
<\/a><\/p>\nDebug.Print direkt im Direktbereich nutzen<\/h2>\n
Debug.Print<\/span><\/span> Now\r\n08.02.2026 11:27:31<\/pre>\n Weekday(Date,vbMonday)\r\n 7 <\/pre>\n
WeekdayName(Weekday(Date,vbMonday))\r\nSonntag<\/pre>\n
Variablenwerte mit Debug.Print ausgeben<\/h2>\n
Public Sub <\/span>Schleife()\r\n Dim <\/span>i As Integer<\/span><\/span>\r\n For i = 1 To 10\r\n Debug.Print<\/span><\/span> i\r\n Next<\/span> i\r\nEnd Sub<\/span><\/pre>\nMehrere Ausdrücke kombinieren<\/h2>\n
Debug.Print<\/span><\/span> \"Aktueller Wert von i: \" & i<\/pre>\nAktueller Wert von i: 1\r\nAktueller Wert von i: 2\r\nAktueller Wert von i: 3\r\n...<\/pre>\n
Debug.Print<\/span><\/span> \"Aktueller Wert von i: \", i<\/pre>\nAktueller Wert von i: 1 \r\nAktueller Wert von i: 2 \r\nAktueller Wert von i: 3\r\n...<\/pre>\n
Mehrere Debug.Print-Ausgaben in die gleiche Zeile schreiben<\/h2>\n
Public Sub <\/span>MehrereDebugPrintsInEinerZeile()\r\n Dim <\/span>i As Integer<\/span><\/span>\r\n Debug.Print<\/span><\/span> \"Vorher: \" & i\r\n i = i + 1\r\n Debug.Print<\/span><\/span> \"Nachher: \" & i\r\nEnd Sub<\/span><\/pre>\n Debug.Print<\/span><\/span> \"Vorher: \" & i,\r\n i = i + 1\r\n Debug.Print<\/span><\/span> \"Nachher: \" & i<\/pre>\n<\/a><\/p>\nDirektbereich leeren<\/h2>\n
\n
Aktuelle Werte innerhalb einer Prozedur mit Debug.Print im Direktbereich ermitteln<\/h2>\n
Public Sub <\/span>Addition()\r\n Dim <\/span>i As Integer<\/span><\/span>\r\n Dim <\/span>intSumme As Integer<\/span><\/span>\r\n For i = 1 To 10\r\n intSumme = intSumme + i\r\n Debug.Print<\/span><\/span> i, intSumme\r\n Next<\/span> i\r\nEnd Sub<\/span><\/pre>\n 1 1 \r\n 2 3 \r\n 3 6\r\n...<\/pre>\n
Haltepunkte – Code anhalten und untersuchen<\/h2>\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