ODBC Requery
06.09.2014 11:35:26
Kaios
Hallo zusammen,
ich habe eine kleine Frage.
Ich verbinde mich via OLEDB per Excel zu einer SQL Datenbank. Ein Makro frägt Daten ab und verarbeitet diese.
Die SQL Abfrage lasse ich aus Ranges einlesen, die Kriterien der Abfrage ändern sich bei jeder Abfrage, das ist auch mein Problem. Kann ich eine Refreshperiod setzen die jedes mal die SQL Abfrage neu einliest?
Hier mein Code:
varConn = "OLEDB;Provider=MSDAORA.1;Password=0815;User ID=4711;Data Source=0815:1521/0815db"
strSQL = Range("Z1").Value & vbCrLf & _
Range("Z2").Value
With ActiveSheet.QueryTables.Add(Connection:=varConn, Destination:=Range("A1"))
.CommandText = strSQL
.Name = "0815"
.Refresh BackgroundQuery:=True
.RefreshPeriod = 1
End With
Danke!Grüße
Kaios