Beitrag aus SmartTools Access Weekly
Tabelle in einer anderen Datenbank löschen
Access 365 2024 2021 2019 2016 2013 2010
FRAGE Ich möchte per VBA auf eine andere Access-Datenbank zugreifen. Konkret soll unter bestimmten Bedingungen eine Tabelle in einer anderen Datenbank entfernt werden. Mit welchem Befehl kann ich also Tabellen aus Datenbank "A" in Datenbank "B" löschen? Die Anweisung DoCmd.DeleteObject acTable, "Name" bezieht sich leider immer nur auf die aktuelle Datenbank und stellt keinen Parameter zur Adressierung einer externen Datenbank bereit.
Diverse Anfragen
ANTWORT Wechseln Sie mit Alt + F11 in die VBA-Entwicklungsumgebung und stellen Sie über Extras-Verweise sicher, dass eine Referenz auf die "Microsoft Office x.0 Access Database Engine Object Library" gesetzt ist. Dann können Sie folgende Anweisungen zum Löschen von Tabellen in einer anderen Datenbank nutzen:
Dim db As DAO.Database
Set db = OpenDatabase(<Pfad/Dateiname>)
db.Execute "DROP TABLE [<Tabellenname>];"
db.Close
Set db = Nothing
"<Pfad/Dateiname>" ersetzen Sie durch den Pfad und Dateinamen der anderen Datenbank und "Tabellenname" durch den Namen der zu löschenden Tabelle.