Eines der ersten Probleme jedes Access-VBA-Programmierers ist ebenso ein beliebtes Streitthema unter erfahrenen Programmierern: Wann ist bei Bezügen der Punkt, wann das Ausrufezeichen als Trennzeichen voranzusetzen oder ist die Verwendung der String-Schreibweise generell vorzuziehen<\/p>\n
Eine einfache Grundregel ist: vor Objekten ein Ausrufezeichen, vor Auflistungen und Eigenschaften ein Punkt. Eine andere bekannte Merkregel lautet: Wenn nach dem Trennzeichen ein Element folgt, das fix in Access eingebaut ist, dann gehört der Punkt dorthin. Wenn das Element benutzerdefiniert ist, dann verwendet man das Ausrufezeichen. Ein Beispiel (in einer Zeile):<\/p>\n
Application.Forms!frmKunden.Controls!Nachname.Visible<\/pre>\nDie Forms-Auflistung ist von Access vorgegeben, deshalb wird hier der Punkt vorangestellt. Das Formular frmKunden wurde vom Entwickler erstellt, deshalb kommt hier das Ausrufezeichen zum Zuge. Die Controls-Auflistung ist wieder ein eingebautes Element von Access. Nachname ist ein benutzerdefinierter Steuerelementname. Die Eigenschaft Visible stammt wiederum von Access.<\/p>\n
Diese Regel gilt auch für die meistangewandte Kurzform:<\/p>\n
Forms!frmKunden!Nachname.Visible<\/pre>\nSo einfach diese Grundregeln sind, so diffizil wird es im Detail, weil VBA sehr variabel ist und oft mehrere Varianten zulässt. Eine Quelle der Unsicherheit und der häufigste Streitpunkt ist dabei Punkt oder Ausrufezeichen nach dem Schlüsselwort Me. Mit Me bezieht man sich auf das Objekt, das heißt die Instanz der Klasse, in der der aktuelle Code ausgeführt wird. In Access ist das meist ein Formular oder ein Bericht. Nach den oben angeführten Regeln müsste man sich auf Steuerelemente mit Ausrufezeichen beziehen, also: Me!MeinSteuerelement.<\/p>\n
Steuerelemente sind in VB und VBA aber nicht nur Objekte, sondern auch Eigenschaften von Formularen. Deshalb funktioniert ebenso: Me.MeinSteuerelement.<\/p>\n
Manche Programmierer bevorzugen diese Schreibweise, weil sie damit im VBA-Editor Intellisense nutzen können, ihnen also automatisch die Liste der im jeweiligen Kontext verfügbaren Objekte und Eigenschaften angezeigt wird (siehe Bild 1).<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic001.png\")
<\/p>\n
Bild 1: Punkt bringt Intellisense im Kontext.<\/span><\/b><\/p>\nBei Verwendung des Ausrufezeichens tritt Intellisense nicht in Aktion. Sie können zwar mit der Tastenkombination STRG + Leertaste die Auswahlliste erzwingen, diese zeigt dann aber nicht die in diesem Kontext verfügbaren Einträge, sondern alle für den VBA-Code in der aktuellen Anwendung verfügbaren Schlüsselworte und Objekte an (siehe Bild 2).<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic002.png\")
<\/p>\n
Bild 2: Auswahlliste ohne Kontext<\/span><\/b><\/p>\nDie Punkt-Schreibweise hat also einen unbestreitbaren Vorteil. Der Nachteil ist jedoch, dass manchmal unvorhersehbare und von Microsoft nicht dokumentierte Probleme damit auftauchen. So kommt es vor, dass nach einer Konvertierung in eine höhere Access-Version oder auch einfach nach einer Neukompilierung die Bezüge nicht mehr funktionieren. Oft passiert diese Art Korruption, wenn für die Steuerelemente dieselben Namen wie für die Felder der Datenquelle verwendet werden. Das scheint aber nur eine der möglichen Mitverursacher zu sein. Jedenfalls treten derartige Probleme mit Ausrufezeichen nicht auf. Deshalb ist es sicherer, auch hier das Ausrufezeichen zu verwenden, oder die ebenfalls zuverlässige String-Schreibweise mit Klammern:<\/p>\n
Me(\"MeinSteuerelement\")<\/pre>\noder<\/p>\n
Me.Controls(\"MeinSteuerelement\")<\/pre>\nFür viele Aufgaben in der VBA-Programmieung ist es von Vorteil oder unbedingt notwendig, statt fixer Objektnamen Variablen verwenden zu können. Das betrifft sowohl Steuerelemente in Formularen und Berichten als auch Felder in Recordsets von DAO oder ADO. Die Lösung für diese Anforderung ist die Schreibweise mit runden Klammern.<\/p>\n
Ein Steuerelement können Sie zum Beispiel so ansprechen:<\/p>\n
Forms(\"Formularname\")(StringVariable)<\/pre>\nEbenso funktioniert es mit einem Feld in einem Recordset:<\/p>\n
rs(StringVariable)<\/pre>\nDie häufigste Verwendung findet die eben behandelte Klammer-Schreibweise in Schleifen zum Durchlaufen von Controls- oder Fields-Auflistungen. Meistens geht es darum, per Code mehrere oder alle Steuerelemente eines Formulares oder Berichtes zu durchlaufen, um eine bestimmte Eigenschaft für diese Elemente in einem Rutsch zu prüfen oder zu ändern.<\/p>\n
<\/p>\n
Eine beliebte Lösungsvariante dafür ist, gleichartige Steuerelemente mit denselben Namen und einer fortlaufenden Nummer zu benennen: Liste1, Liste2, Liste3… oder Combo1, Combo2…<\/p>\n
Mit dieser Voraussetzung ist es dann einfach, zum Beispiel die Eigenschaft Sichtbar der Steuerelemente zu ändern:<\/p>\n
Dim i As Integer\r\nFor i = 1 To 5\r\n Me(\"Liste\" & i).Visible = False\r\nNext<\/pre>\nEine andere Variante, um bestimmte Steuerelemente zu kennzeichnen, ist die Verwendung ihrer Eigenschaft Marke (Tag). <\/p>\n
Die Eigenschaft ist genau für diesen Zweck vorhanden, also eine kennzeichnende Information oder irgendeinen Memo-Text für Objekte zu hinterlegen, der ansonsten keine Auswirkungen auf die Funktionalität oder die Eigenschaften des Objektes hat.<\/p>\n
Um sie für Steuerelemente zu nützen, können Sie sie per Code durch die Controls-Auflistung von Formularen und Berichten schleifen und Tag prüfen:<\/p>\n
Dim ctl As Control\r\nFor Each ctl In Me.Controls\r\n If ctl.Tag = \"Suchtext\" Then ctl.Visible = False\r\nNext ctl<\/pre>\nWenn Sie ein Meldungsfenster öffnen, so wird der Code angehalten, bis die Box wieder geschlossen wird. Damit können Sie im Code nach dem Aufruf des Meldungsfensters sofort auf die im Meldungsfenster gewählte Schaltfläche reagieren. Bild 3 zeigt eine solche Anordnung.<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic003.png\")
<\/p>\n
<\/b><\/p>\n
Bild 3: Meldungsfenster als Dialogformular<\/span><\/b><\/p>\nIm Formular frmDialogAufruf wird per Schaltfläche ein Meldungsfenster aufgerufen. Im Meldungsfenster klickt der Benutzer auf Ja oder Nein. Danach erst läuft der Code im aufrufenden Formular weiter und zeigt dabei das Ergebnis der MsgBox-Funktion an. Der Code hinter der Schaltfläche zum Aufruf des Meldungsfensters sieht dabei so aus:<\/p>\n
Dim intAntwort As Integer\r\nintAntwort = MsgBox(\"Bitte klicken \" _ \"Sie auf Ja oder Nein.\", vbYesNo Or _ vbQuestion, \"Msgbox als Dialog\")\r\nSelect Case intAntwort\r\n Case vbYes\r\n Me!txtErgebnis = \"Ja\"\r\n Case vbNo\r\n Me!txtErgebnis = \"Nein\"\r\nEnd Select<\/pre>\nDer Grund für das Anhalten des Codes ist, dass das Meldungsfenster modal ist. Es muss zuerst geschlossen werden, bevor Access die aufrufende Prozedur fortführt und wieder Anwenderaktionen in anderen Objekten zulässt.<\/p>\n
Die Möglichkeiten eines Meldungsfensters sind auf wenige, fix vorgegebene Schaltflächen begrenzt. Sie können die Dialog-Funktionalität aber auch mit einem selbst definierten modalen Formular programmieren (siehe Bild 4)<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic004.png\")
<\/p>\n
<\/b><\/p>\n
Bild 4: Modales Formular als Dialog<\/span><\/b><\/p>\nDas Dialogformular ist dabei im Vergleich zum Meldungsfenster um weitere Schaltflächen ergänzt. Es könnte aber auch Eingabefelder und so weiter enthalten. Der Code hinter den Schaltflächen im Dialogformular besteht nur aus einer schlanken Anweisung:<\/p>\n
Me.Visible = False<\/pre>\nDas Dialogformular wird also unsichtbar gemacht. Damit hat das aufrufende Formular wieder den Fokus, sein Code läuft weiter und kann auf die Benutzereingaben im Dialogformular zugreifen. Der entsprechende aufrufende und reagierende Code lautet:<\/p>\n
DoCmd.OpenForm \"frmDialog\", , , , , _ acDialog\r\ntxtErgebnis = _ Forms!frmDialog.ActiveControl.Caption\r\nDoCmd.Close acForm, \"frmDialog\"<\/pre>\nDas Dialogformular wird mit dem Wert acDialog im Parameter Fenstermodus geöffnet. Damit hält der Code an, bis das Dialogformular entweder geschlossen oder unsichtbar gemacht wird. Danach läuft der Code weiter und es wird ein Textfeld im aufrufenden Formular mit der Beschriftung der im Dialogformular gewählten Schaltfläche versorgt. Am Ende wird das Dialogformular geschlossen, damit es nicht dauerhaft unsichtbar geöffnet bleibt.<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic005.png\")
<\/p>\n
<\/b><\/p>\n
Bild 5: Der Parameter wird nicht erkannt<\/span><\/b><\/p>\nMit dieser Technik können Sie universell einsetzbare Dialogformulare gestalten, die unabhängig vom aufrufenden Formular gestaltet sein können, denn der gesamte auswertende Code steht nicht im Dialogformular, sondern im aufrufenden Formular.<\/p>\n
Einer der großen Vorteile von Access gegenüber anderen Datenbankprogrammen ist die sehr einfache und mächtige Erstellung und Nutzung von Parameterabfragen. Es reicht ja für unerfahrene Benutzer bereits, in einer Abfrage als Kriterium einen Text in eckigen Klammern einzugeben, und Access bringt keine Fehlermeldung, sondern fragt brav nach dem Wert für diesen Parameter und verwendet ihn dann als Filter.<\/p>\n
Ebenfalls sehr einfach ist die Verwendung von Bezügen auf Formularfelder als Kriterium:<\/p>\n
Formulare!Formularname!SteuerelementName<\/pre>\nholt den Wert im angegebenen Steuerelement und filtert danach.<\/p>\n
Ich empfehle allerdings bei solchen Bezügen in Abfragen grundsätzlich die englische Schreibweise, also:<\/p>\n
Forms!Formularname!SteuerelementName<\/pre>\nDabei geht es nicht so sehr um die vier eingesparten Buchstaben, obwohl das auch nett ist. Wenn die Datenbank irgendwann einmal in einem nicht deutschen Access laufen soll, wird Formulare leider oft nicht automatisch übersetzt und verursacht eine Fehlermeldung.<\/p>\n
Ein Problem mit Formularbezügen in Abfragen gibt es, wenn Sie versuchen, eine solche Parameterabfrage als Recordset zu öffnen.<\/p>\n
DAO greift anders auf JET zu als der Abfrageeditor von Access. Deshalb werden Formularbezüge nicht erkannt. Im frmParameter der Beispieldatenbank wird mit folgendem Code auf eine Parameterabfrage zugegriffen:<\/p>\n
Dim db As DAO.Database\r\nDim rs As DAO.Recordset\r\nSet db = CurrentDb\r\nSet rs = db.OpenRecordset _ (\"qryParameterAccess\", dbOpenDynaset)<\/pre>\nIn der Abfrage qryParameterAccess steht ein Bezug auf das Kombinationsfeld im geöffneten Formular:<\/p>\n
[Forms]![frmParameter]![cboBezeichnung]<\/pre>\nBild 5 zeigt die Fehlermeldung, die aus diesem Zugriffsversuch resultiert.<\/p>\n
Der Fehler Nummer 3061 besagt, dass ein Parameter erwartet, aber zu wenige übergeben wurden.<\/p>\n
Die Zahl der nicht erkannten Parameter in der Fehlermeldung erhöht sich mit jedem Formularbezug und mit jedem Text-Parameter in eckigen Klammern in der Abfrage. Beides funktioniert an der Access-Oberfläche, nicht aber mit DAO.<\/p>\n
Quellcode 1: Parameterabfragen per VBA öffnen<\/b><\/p>\nPrivate Sub btnParameterCode1_Click()\r\n On Error GoTo myError\r\n Dim db As DAO.Database\r\n Dim rs As DAO.Recordset\r\n Dim qdf As DAO.QueryDef \r\n Set db = CurrentDb \r\n Set qdf = db.QueryDefs(\"qryParameterCode\")\r\n qdf.Parameters(\"Forms!frmParameter!cboBezeichnung\") = Me!cboBezeichnung\r\n qdf.Parameters(\"Wie lautet die Bezeichnung\") = \"Beamer\" \r\n Set rs = qdf.OpenRecordset(dbOpenDynaset) \r\n Do Until rs.EOF\r\n Debug.Print rs!Bezeichnung\r\n rs.MoveNext\r\n Loop \r\nmyExit:\r\n If Not qdf Is Nothing Then\r\n qdf.Close\r\n Set qdf = Nothing\r\n End If \r\n If Not rs Is Nothing Then\r\n rs.Close\r\n Set rs = Nothing\r\n End If \r\n Exit Sub \r\nmyError:\r\n Select Case Err.Number\r\n Case 99999 ''spezifische Fehler abfangen\r\n Case Else\r\n MsgBox \"Exception Nr. \" & Err.Number & \" \" & Err.Description\r\n End Select\r\n Resume myExit \r\nEnd Sub<\/pre>\nAbhilfe für den Formularbezug bringt der folgendermaßen geänderte Parameter in der Abfrage (in einer Zeile):<\/p>\n
Eval(\"[Forms]![frmParameter]![cboBezeichnung]\")<\/pre>\nMit diesem Ausdruck lässt sich wieder ohne Probleme per Recordset auf die Abfrage zugreifen, denn die Funktion Eval sorgt für die Auswertung des Formularbezuges, bevor die Abfrage von JET weiterverarbeitet wird.<\/p>\n
Wichtig ist auch hier wieder die Verwendung der englischen Schreibweise „Forms“. Das deutsche „Formulare“ wird innerhalb von Eval nicht erkannt.<\/p>\n
Das ist übrigens ein Stolperstein bei der Konvertierung von alten Datenbanken im Format von Access 2 in neuere Access-Versionen. <\/p>\n
Bis zur Version Access 2 wurde Formulare in diesem Fall akzeptiert, ab Access 95 nicht mehr.<\/p>\n
Es gibt noch eine andere und leistungsfähigere Möglichkeit, Parameterabfragen per VBA zu öffnen. Sie besteht darin, die Parameter, egal ob Formularbezüge oder Textparameter, aktiv an die Parameters-Auflistung der Abfrage zu übergeben. Quellcode 1 zeigt, wie das im Beispielformular frmParameter funktioniert.<\/p>\n
In der DAO-Auflistung Parameters stehen alle Parameter der Abfrage, egal ob sie in der Abfrage explizit als Parameter deklariert oder einfach verwendet werden. Mit folgender Anweisung können Sie eine Wertzuweisung vornehmen und dann ein Recordset auf Basis der Abfrage öffnen (in einer Zeile): <\/p>\n
qdf.Parameters(\"ParameterbezeichnungOderText\") = \"GewünschterWert\"<\/pre>\nNicht nur diese aktive Wertzuweisung ist ein Vorteil. Wie im Beispielcode gezeigt, erreicht man über die Parameters-Auflistung, im Unterschied zum zuvor erläuterten Eval-Trick, nicht nur Bezüge auf Access-Objekte, sondern auch Textparameter und gewinnt zudem deutlich Geschwindigkeit bei der Ausführung der Abfrage.<\/p>\n
Aktionsabfragen lassen sich ebenfalls auf die beschriebene Art mit Parametern versorgen und danach zum Beispiel mit qdf.Execute ausführen.<\/p>\n
Das Basteln und Ausführen von SQL-Strings ist eine der mächtigsten Funktionalitäten von VBA. Zu den häufigsten Fehlerquellen dabei zählt die übergabe von Dezimalzahlen von VBA an SQL.<\/p>\n
Egal in welchem Bereich eine Dezimalzahl an SQL übergeben werden soll, ob im WHERE-, SET-, INSERT INTO-Abschnitt oder per VALUES:<\/p>\n
Durch die amerikanische Herkunft von SQL muss sie immer den Punkt als Dezimaltrennzeichen haben, ansonsten gibt es unweigerlich einen Syntaxfehler.<\/p>\n
Das sind Sie ja auch von VBA her gewohnt. Heimtückisch ist jedoch, dass im Code zwar der Punkt als Dezimaltrennzeichen verwendet und angezeigt wird, bei der übergabe an einen SQL-String dieser Punkt aufgrund der deutschen Ländereinstellungen jedoch stillschweigend in ein Komma umgewandelt wird. Die erste Schaltfläche im Beispielformular frmSQL (siehe Bild 6) enthält einen solchen harmlos wirkenden Code:<\/p>\n
Dim curGehalt As Currency\r\ncurGehalt = 2345.9\r\nDoCmd.RunSQL \"UPDATE tblPersonen SETMonatsgehalt = \" & curGehalt & \" WHERE PersonId= \" & Me!cboPerson<\/pre>\nDamit soll dem im Kombinationsfeld cboPerson ausgewählten Mitarbeiter ein Monatsgehalt von 2345.9 zugewiesen werden. Das Ergebnis beim Ausführen dieses Codes ist jedoch die Fehlermeldung 3144 „Fehler in UPDATE-Anweisung“. Erst eine kleine änderung am Code bringt Abhilfe:<\/p>\n
![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic006.png\")
<\/p>\n
<\/b><\/p>\n
Bild 6: Beispielformular für Wertübergaben an SQL<\/span><\/b><\/p>\nDoCmd.RunSQL \"UPDATE tblPersonen SET Monatsgehalt = \" & Str(curGehalt) & \" WHERE PersonId = \" & Me!cboPerson<\/pre>\nDie Neuerung ist die Verwendung der Str-Funktion. Sie wandelt die übergebene Zahl in den Typ Variant (Untertyp String) um und hat die Besonderheit, dass sie den Punkt als Dezimaltrennzeichen braucht und bei der Konvertierung bewahrt. Dadurch landet dann der Punkt auch richtig im SQL-String und die Aktualisierungsabfrage funktioniert.<\/p>\n
ähnlich gelagerte Probleme, die sogar noch häufiger auftreten, gibt es bei der übergabe von Datumswerten. Mit SQL-Strings hat man es nicht nur als erfahrener Codierer von komplexen SQL-Anweisungen zu tun, sondern auch schon bei der Formulierung der Bedingung von Domänenaggregatfunktionen wie DLookUp oder DMax, die ja einem SQL-WHERE-Abschnitt entsprechen muss.<\/p>\n
Im Beispielformular frmSQL gibt es eine Schaltfläche mit folgendem Code:<\/p>\n
Dim dteGeburtstag As Date\r\ndteGeburtstag = #12\/31\/1979#\r\nMsgBox DCount(\"*\", \"tblPersonen\", _ \"GeburtsDatum > \" & dteGeburtstag)<\/pre>\n![](\"..\/fileadmin\/_temp_\/{2DC8127F-1149-46CC-A335-396671E44353}\/pic007.png\")
<\/p>\n
<\/b><\/p>\n
Bild 7: Scheinbar richtiges Datum bringt einen Fehler<\/span><\/b><\/p>\nDer Code soll in einem Meldungsfenster die Anzahl der Mitarbeiter ausgeben, die nach dem 31.12.1979 geboren sind. Das Ergebnis ist jedoch die Syntax-Fehlermeldung aus Bild 7.<\/p>\n
Am Text der Fehlermeldung sieht man, dass das Datum korrekt als 31.12.1979 erkannt wurde. Die Umstellung von Monat und Tag nimmt VBA übrigens automatisch vor. Wenn Sie also im Code eintippen #31\/12\/1979#, wandelt der Code-Editor beim Verlassen der Zeile automatisch um in das amerikanische Datumsformat #12\/31\/1979#.<\/p>\n
Bei der übergabe an den SQL-String oder hier an die DCount-Funktion wird aber das Datum noch einmal entsprechend der Sprach- und Regionseinstellungen in der Systemsteuerung umgewandelt.<\/p>\n
Abhilfe bringt wieder nur die sichere übergabe in einem für SQL lesbaren Datumsformat. Man liest öfter, dass JET-SQL durch seine amerikanische Herkunft nur das amerikanische Datumsformat, also mmddyy akzeptieren würde.<\/p>\n
Das stimmt so nicht, denn immerhin akzeptiert es auch das universellere und für alle unmissverständlich lesbare Datumsformat nach der ISO-Norm 8601 (yyyy-mm-dd). <\/p>\n
Der Beispielcode dafür im Formular frmSQL lautet:<\/p>\n
Dim strDatum As String\r\nstrDatum = Format(#12\/31\/1979#, _ \"\\#yyyy\\-mm\\-dd\\#\")\r\nMsgBox DCount(\"*\", _ \"tblPersonen\", _ \"GeburtsDatum > \" _ & strDatum)<\/pre>\nDas Datum wird damit in einen String umgewandelt und in das ISO-Format gebracht. Die Schrägstriche im Formatausdruck bewirken dabei, dass das jeweils nachfolgende Zeichen als Literal behandelt wird. Das bedeutet, dass es von der Format-Funktion nicht symbolisch umgedeutet wird, sondern ein Rautezeichen ein Rautezeichen und ein Bindestrich ein Bindestrich bleibt, nicht etwa zu einem Minus wird.<\/p>\n
Alternativ funktioniert, wie gesagt, auch das amerikanische Datumsformat:<\/p>\n
strDatum = Format(#12\/31\/1979#, \"\\#mm\\\/dd\\\/yy\\#\")<\/pre>\nEine weitere, einfacher zu schreibende Möglichkeit ist die Umwandlung des Datums in eine Zahl. JET verwaltet Datumswerte intern ja als Doublezahl, wobei vor dem Komma die Anzahl der Tage ab dem 30.12.1899 steht und nach dem Komma die Uhrzeit als Bruchteil eines Tages. Im Beispiel funktioniert also auch die Umwandlung mit einer Konvertierungsfunktion:<\/p>\n
MsgBox DCount(\"*\", \"tblPersonen\", _\"GeburtsDatum > \" & CLng(#12\/31\/1979#))<\/pre>\nAufpassen müssen Sie, wenn Sie auch eine Uhrzeit übergeben möchten. Es reicht dann nicht, bloß die Verwendung des richtigen Zahlentyps Double:<\/p>\n
CDbl(#12\/31\/1979 12:00:00 PM#)<\/pre>\n12:00 Uhr wird hier zu „0,5“ umgewandelt, womit wir wieder beim Problem des Dezimaltrennzeichens wären.<\/p>\n
Die Lösung dafür kennen Sie bereits: <\/p>\n
Str(CDbl(#12\/31\/1979 12:00:00 PM#))<\/pre>\n","protected":false},"excerpt":{"rendered":"In der Access-FAQ von Karl Donaubauer (www.donkarl.com) finden Sie die meistgestellten Fragen und Anworten zum Thema Microsoft Access. In dieser Beitragsreihe stellt Karl Donaubauer die wichtigsten Einträge im Detail vor und zeigt Ihnen entsprechende Lösungen anhand praxisnaher Beispiele. Im zwölften Teil werden Lösungen für die häufigsten Probleme in VBA vorgestellt.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[66012006,662006,44000004],"tags":[],"class_list":["post-55000329","post","type-post","status-publish","format-standard","hentry","category-66012006","category-662006","category-Tipps_und_Tricks"],"yoast_head":"\n
Access-FAQ: Rund um Access - Access im Unternehmen<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Access-FAQ: Rund um Access\" \/>\n<meta property=\"og:description\" content=\"In der Access-FAQ von Karl Donaubauer (www.donkarl.com) finden Sie die meistgestellten Fragen und Anworten zum Thema Microsoft Access. In dieser Beitragsreihe stellt Karl Donaubauer die wichtigsten Einträge im Detail vor und zeigt Ihnen entsprechende Lösungen anhand praxisnaher Beispiele. Im zwölften Teil werden Lösungen für die häufigsten Probleme in VBA vorgestellt.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-06T15:18:16+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a\" \/>\n<meta name=\"author\" content=\"Andr\u00e9 Minhorst\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Andr\u00e9 Minhorst\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"16\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"Access-FAQ: Rund um Access\",\"datePublished\":\"2020-05-06T15:18:16+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/\"},\"wordCount\":2856,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/dff5f17892f7459ea8e5388b0fe3957a\",\"articleSection\":[\"1\\\/2006\",\"2006\",\"Tipps und Tricks\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/\",\"name\":\"Access-FAQ: Rund um Access - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/dff5f17892f7459ea8e5388b0fe3957a\",\"datePublished\":\"2020-05-06T15:18:16+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/dff5f17892f7459ea8e5388b0fe3957a\",\"contentUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/dff5f17892f7459ea8e5388b0fe3957a\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/AccessFAQ_Rund_um_Access\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Access-FAQ: Rund um Access\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"name\":\"Access im Unternehmen\",\"description\":\"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access\",\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/access-im-unternehmen.de\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\",\"name\":\"Andr\u00e9 Minhorst Verlag\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"contentUrl\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"width\":370,\"height\":111,\"caption\":\"Andr\u00e9 Minhorst Verlag\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"Access-FAQ: Rund um Access - Access im Unternehmen","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/","og_locale":"de_DE","og_type":"article","og_title":"Access-FAQ: Rund um Access","og_description":"In der Access-FAQ von Karl Donaubauer (www.donkarl.com) finden Sie die meistgestellten Fragen und Anworten zum Thema Microsoft Access. In dieser Beitragsreihe stellt Karl Donaubauer die wichtigsten Einträge im Detail vor und zeigt Ihnen entsprechende Lösungen anhand praxisnaher Beispiele. Im zwölften Teil werden Lösungen für die häufigsten Probleme in VBA vorgestellt.","og_url":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/","og_site_name":"Access im Unternehmen","article_published_time":"2020-05-06T15:18:16+00:00","og_image":[{"url":"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"16\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"Access-FAQ: Rund um Access","datePublished":"2020-05-06T15:18:16+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/"},"wordCount":2856,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#primaryimage"},"thumbnailUrl":"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a","articleSection":["1\/2006","2006","Tipps und Tricks"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/","url":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/","name":"Access-FAQ: Rund um Access - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#primaryimage"},"thumbnailUrl":"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a","datePublished":"2020-05-06T15:18:16+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#primaryimage","url":"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a","contentUrl":"http:\/\/vg08.met.vgwort.de\/na\/dff5f17892f7459ea8e5388b0fe3957a"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/AccessFAQ_Rund_um_Access\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"Access-FAQ: Rund um Access"}]},{"@type":"WebSite","@id":"https:\/\/access-im-unternehmen.de\/#website","url":"https:\/\/access-im-unternehmen.de\/","name":"Access im Unternehmen","description":"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access","publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/access-im-unternehmen.de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/access-im-unternehmen.de\/#organization","name":"Andr\u00e9 Minhorst Verlag","url":"https:\/\/access-im-unternehmen.de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/","url":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","contentUrl":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","width":370,"height":111,"caption":"Andr\u00e9 Minhorst Verlag"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f","name":"Andr\u00e9 Minhorst","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","caption":"Andr\u00e9 Minhorst"}}]}},"_links":{"self":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000329","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/comments?post=55000329"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000329\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55000329"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55000329"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55000329"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}