{"id":55000174,"date":"2013-10-01T00:00:00","date_gmt":"2020-01-24T15:58:41","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=174"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Aktionsabfragen_per_VBA","status":"publish","type":"post","link":"https:\/\/access-basics.de\/index.php\/Aktionsabfragen_per_VBA.html","title":{"rendered":"Aktionsabfragen per VBA"},"content":{"rendered":"
Mit Aktionsabfragen ändern Sie Daten – ganz im Gegensatz zu Auswahlabfragen, mit denen Sie Daten selektieren. Die Grundlagen zur Erstellung von Aktionsabfragen mit der Entwurfsansicht für Abfragen haben wir in früheren Artikeln bereits behandelt, aber wir haben uns noch nicht im Detail angesehen, wie Sie solche Abfragen unter VBA ausführen.<\/p>\n
Beispieldatenbank<\/h2>\n
Die Beispiele dieses Artikels finden Sie in der Datenbank 1211_AktionsabfragenPerVBA.mdb<\/b>.<\/p>\n
Varianten<\/h2>\n
Es gibt mehrere Möglichkeiten, eine Aktionsabfrage unter VBA auszuführen. Die zwei bekanntesten sind die folgenden: Die erste ist die RunSQL<\/b>-Methode des DoCmd<\/b>-Objekts. Diese erwartet als Parameter den Namen einer gespeicherten Aktionsabfrage oder den entsprechenden SQL-Ausdruck. Optional kann eine Transaktion angegeben werden, in der die Aktionsabfrage ausgeführt wird. Die zweite Variante ist die Execute<\/b>-Methode des Database<\/b>-Objekts der DAO-Bibliothek. Sie bietet ebenfalls einen Parameter an, dem Sie den SQL-Ausdrucks der auszuführenden Abfrage zuweisen – jedoch keine gespeicherten Abfragen, die Sie mit der Abfrage-Entwurfsansicht erstellt haben! Der zweite Parameter jedoch dient der übergabe von Optionen.<\/p>\n
Die Execute<\/b>-Anweisung bietet wesentlich mehr Möglichkeiten als die RunSQL<\/b>-Methode. Sie können beispielsweise Fehler abfragen, die beim Ausführen von Aktionsabfragen mit der Execute<\/b>-Anweisung auftreten, oder Sie fragen die Anzahl der von der Aktionsabfrage betroffenen Datensätze ab. Schließlich können Sie auch noch den Primärschlüsselwert des zuletzt hinzugefügten Datensatzes ermitteln, sofern dieser mit einer Aktionsabfrage hinzugefügt wurde.<\/p>\n
Einsatz der DoCmd.RunSQL-Methode<\/h2>\n
Die DoCmd.RunSQL<\/b>-Methode ist prinzipiell mit dem Menübefehl zum Ausführen der aktuell im Datenbankfenster beziehungsweise im Navigationsbereich markierten Aktionsabfrage zu vergleichen. Der Unterschied ist, dass Sie bei der VBA-Anweisung noch den Namen der Anweisung angeben müssen. Um eine einfache Abfrage zum ändern eines Datensatzes auszuführen, legen Sie diese zunächst wie in Bild 1 an und speichern sie unter dem Namen qryLagerbestandErhoehen<\/b>. Die Abfrage erhöht den Bestand des Artikels mit dem Wert 1 <\/b>im Feld ArtikelID <\/b>um 1<\/b>.<\/p>\n
![\"Aktionsabfrage](\"..\/tl_files\/images\/pic_174_001.png\")
<\/a><\/p>\n