Zugriff auf Access mit VBA

Sie wollen Adressen, die in einer Accesstabelle gespeichert sind, in Word weiter benutzen? Sie wollen eine Tabelle aus Access in eine Wordtabelle einfügen? Das ist mit VBA alles möglich und sogar noch mehr. Denn Sie können auch von Word aus auf Formulare in Access zugreifen und diese mit Daten füllen. Es sind dem Erfindungsreichtum keine Grenzen gesetzt.

Doch zunächst haben Sie die zwei Methoden, mit denen Sie Access einbinden können.

Early Binding

Bei der Early Binding setzen Sei eine Verweis im VBA-Editor. Der Verweis für Access muss so lauten:

Microsoft Access xx.0 Object Library

Das xx bezeichnet die Officeversion, wobei 9 für Office 2000 bis 12 für Office 2007 gilt.

Zunächst müssen Sie ein Objekt für die Accessanwendung deklarieren und anschließend zuweisen:

Dim ObjAccess As Access.Application
Set ObjAccess = New Access.Application

Jetzt stehen Ihnen mit dem Objekt ObjAccess alle Möglichkeiten von Access zur Verfügung. Aber vergessen Sie nicht nach der Verarbeitung das Objekt zu entladen:

Set ObjAccess = Nothing

Late Binding

Bei Late Binding wird der Verweis mit dem Code gesetzt:

Dim ObjAccess As Object
Set ObjAccess = CreateObject("Access.Application")

Die Methode CreateObject benutzen Sei dann, wenn Access noch nicht geöffnet ist. Sollte Access bereits geöffnet sein, könne sie auch das GetObject benutzen. Dann sieht die Zeile so aus:

Set ObjAccess = GetObject(, "Access.Application")

Damit haben Sie bereits alles soweit erledigt und Sie können auf das Access-Objekt zugreifen. Eins sei aber noch angemerkt: Bei der Methode Late Binding kann es Ihnen passieren, dass nicht alle Objekte bzw. Eigenschaften zur Verfügung stehen. Welche das sind, muss man im Einzelfall überprüfen.

Wir wollen Ihnen auch nicht vorenthalten, dass zwar mit diesen Zeilen Access geladen ist, aber sichtbar ist es noch nicht. Das gilt für beide Methoden. Wollen Sie Access für den User anzeigen lassen, müssen Sie noch folgende Zeile hinzufügen:

ObjAccess.Visible = True

Schauen Sie sich einfach mal die Beispiel an, was man alles realisieren kann.