Hallo,
ich habe mal eben im Archiv gesucht, aber so richtig bin ich nicht fündig geworden.
Ich möchte eine Abfrage von Oracle Daten so gestalten, dass ich Benutzername, Passwort und Server nicht fest ablegen muss. Da ich aber mehrere Abfragen hintereinander habe, würde ich mir gerne ne Userform machen, die die Daten einmal anfragt und ich dann an den entsprechenden stellen drauf zugreifen kann.
Bis jetzt habe ich das ganze nur so hinbekommen, dass ich die entsprechenden Stellen leer lasse und dann kommt der normale Abfragedialog (UID; PWD, SERVER) zwei mal hintereinander. Mir würde ja schon helfen, wenn ich die sonst wo speichern könnte und dann einfach in dem folgenden Code abfragen könnte?!
Habe hier mal nur eine Abfrage reingestellt:
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DRIVER={Microsoft ODBC für Oracle};UID=;PWD=;SERVER=;", _
Destination:=Range("B3"))
.CommandText = Array( _
"Hier war ein SQL drin, läuft auch")
.Name = "Abfrage von Daten"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With
Für eure Hilfe wäre ich sehr dankbar