Supportnet / Forum / Anwendungen(Java,C++...)
VBA Makro mit SQL Server Verbinden
Frage
Hallo,
ich möchte gerne mit einem VBA Makro in Excel eine Abfrage auf meine SQL Datenbank machen (SQL Server 2000). Ich habe mich für eine ODBC Verbindung entschieden. Beim Ausführen von meinem Code gibt es keine Probleme.
Frage: Wie kann ich herraus bekommen ob wirkliche eine Verbindung aufgebaut wurde? Wie kann ich das Ergebnis meiner Abfrage in einer Zelle anzeigen lassen?
Bin ich schon auf den richtigen Weg?
Hier kommt mein Code.
Code:
Optionen:
Sub DB()
Dim db As Database
Dim qd As QueryDef
Set db = OpenDatabase("Name", False, False, "ODBC;" & "DSN=ODBCName;" & "UID=xx; PWD=xxx; " & " Database=DBName")
Set qd = db.CreateQueryDef("")
With qd
.Connect = "ODBC;DSN=ODBCName;UID=xxx; PWD=xxx; Database=DBName"
.sql = "Select * From Tabelle"
End With
End Sub
Danke!
MFG
Cathleen

