ich möchte gern mit Excel auf Access Daten zugreifen.
Hier ist mein Code:
Dim Text as String
Text= "Huber"
'************************************
'Datenbankverbindung herstellen
'************************************
Dim cnDatabase As ADODB.Connection
Set cnDatabase = New ADODB.Connection
With cnDatabase
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Persist Security Info=False;" & _
"Data Source=H:\Daten\Datenbank.mdb;" & _
"Jet OLEDB:Database Password=dadada"
.Open
End With
Dim rsTest As ADODB.Recordset
Set rsTest = New ADODB.Recordset
With rsTest
.ActiveConnection = cnDatabase
.Source = "SELECT Name FROM Namenstabelle Where Name=" & Chr(39) & Text & Chr(39)
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open
End With
' anschließend einbauen von den Werten in speziellen Zellen
...soweit funktioniert das ganze auch. also ein Auslesen der Daten aus Access. Doch was ist mit einem Eintrag von Werte in Access, also von Excel nach Access???, wie mache ich dies? Wie lautet die Syntax dafür oder was muss ich da beachten? Was gibt es an diesem Code-Snippet auszusetzen? Was kann ich besser machen?
Grüße
Günther