excel <-> mysql VBA-Anbindung

[Gerhard Wolf]

Hallo,

leider konnte ich bisher noch nicht mehr als:

Sub MySQL()
'Dim Conn As New ADODB.Connection
'Dim Rec As New ADODB.Recordset
Dim Conn As New Connection
Dim Rec As New Recordset
Dim sql$
Set ws = ThisWorkbook.Worksheets("Hilfstabellen")

'Herstellen der Verbindung zwischen Excel und MySQL
Conn.Open "Provider=MSDASQL;Password=strenggeheim;User ID=root;Data
Source=testdb;DB=testdb1"

'Abfrage erstellen
sql = "SELECT * FROM testdb;"

'Öffnen der Abfrage
Rec.Open sql, Conn

End Sub

zur Anbindung von Excel and MySQL ergoogeln.
Ich würde mir gerne ein paar VB-Funktionen bauen um Daten aus einer
MySQL-Datenbank zu lesen und zu schreiben. Leider meldet Excel
"Benutzerdefinierter Typ nicht definiert".

Der ODBC-MySQL-Treiber funktioniert, da ich mit Daten->Externe Daten
importieren->Daten importieren.... die MySQL-Daten auf einen Rutsch
einlesen kann.

Kann mir jemand ein funktionierendes Beispiel zu diesem Problem nennen?

[Thomas Ramel]

Grüezi Gerhard

Gerhard Wolf schrieb am 15.08.2006
[Code gesnippt]

Post by Gerhard Wolf
zur Anbindung von Excel and MySQL ergoogeln.
Ich würde mir gerne ein paar VB-Funktionen bauen um Daten aus einer
MySQL-Datenbank zu lesen und zu schreiben. Leider meldet Excel
"Benutzerdefinierter Typ nicht definiert".
Der ODBC-MySQL-Treiber funktioniert, da ich mit Daten->Externe Daten
importieren->Daten importieren.... die MySQL-Daten auf einen Rutsch
einlesen kann.
Kann mir jemand ein funktionierendes Beispiel zu diesem Problem nennen?

Vielleicht helfen dir die folgenden Seiten dabei etwas weiter?

http://www.sqlstrings.com/
http://www.applecore99.com/gen/gen034.asp
http://www.erlandsendata.no/english/index.php?d=envbadacconnstring


Mit freundlichen Grüssen
Thomas Ramel (@work)