Die Community zu .NET und Classic VB.
Menü

FAQ 0117: Wie verbinde ich meine Anwendung mit ADO mit einer Excel-Datenbank?

 von 

Frage 

Wie verbinde ich meine Anwendung mit ADO mit einer Excel-Datenbank?

Antwort  

Bei ActiveVB gibt es ein paar Tutorials, die unbedingt gelesen werden sollten:

Hier ein Beispiel (es wird angenommen, daß Excel97 verwendet wird, Excel2000 hat die Version 9.0):

'   Settings für die Connection
Const cstrDatabase As String = "C:\Programme\Microsoft Office\Office\vbaliste.xls"

'   Datenbank-Objekt anlegen
Set DB = New ADODB.Connection

'   Datenbank öffnen
With DB
    .Provider = "Microsoft.Jet.OLEDB.4.0"
    .Properties("Data Source") = cstrDatabase
    .CursorLocation = adUseClient
    .Mode = adModeShareDenyNone
    .Properties("Extended Properties") = "Excel 8.0;HDR=YES;"
    .Open
    Debug.Print .ConnectionString
   .Close
End With

'   Datenbank-Objekt entfernen
Set DB = Nothing

Listing 1: Excel-Sheet mit ADO ansprechen

"HDR=YES" bewirkt, daß die erste Zeile der Datenblätter als Spaltennamen interpretiert werden. Wenn dem nicht so ist, muß man "HDR=NO" eintragen.

Ihre Meinung  

Falls Sie Fragen zu dieser FAQ haben, Ihre Erfahrung mit anderen Nutzern austauschen möchten oder auf eine Ergänzung hinweisen möchten, dann teilen Sie uns diese bitte in einem der unten vorhandenen Themen oder über einen neuen Beitrag mit. Hierzu können sie einfach einen Beitrag in einem zum Thema passenden Forum anlegen, welcher automatisch mit dieser Seite verknüpft wird.