Die Möglichkeit, für den Status eines ODBC-Treibers durch eine DSN -Verbindung mit Check Visual Basic für Applikationen können Sie Zeit sparen , indem Sie Ihr Programm endet , wenn die ODBC-Verbindung nicht existiert. VBA in Microsoft Office-Anwendungen verwendet, um Routineaufgaben sonst manuell durchgeführt automatisieren. In Excel können Sie mit VBA , um den Prozess zum Importieren von Daten aus einer Access- Datenbank mithilfe eines ODBC-Verbindung zu automatisieren. Anleitung
1

Starten Sie Microsoft Office Excel . Klicken Sie auf die Registerkarte "Entwicklertools" gefolgt von " Visual Basic ". Klicken Sie auf das Menü "Einfügen" und dann "Module" ein neues Modul einfügen
2

Erstellen Sie eine neue Sub-Prozedur : .

Private Sub checkODBC ( ) auf Twitter Seite 3

erstellen der Objektvariablen Sie verwenden, um den ODBC-Treiber überprüfen wird :

Dim adoCNN Wie ADODB.Connection

Dim canConnect As Boolean

Set adoCNN = Neue ADODB.Connection
4

Definieren Sie die ODBC Name, Login-Name und Passwort :

adoCNN.Open "DSN Name", " username" , "password"

5

Überprüfen Sie den Zustand des ODBC-Treibers :

Wenn adoCNN.State = AdStateOpen Dann

canConnect = True

adoCNN.Close
< p> End If
6

Anzeige eine Meldung informiert den Benutzer über den Zustand der ODBC-Verbindung :

Wenn canConnect Dann

MsgBox " ODBC-Verbindung ist bereit "

Else

MsgBox" ODBC-Verbindung ist nicht bereit! "

End If End Sub

7

Drücken Sie "F5" um die Prozedur auszuführen .