Ich lese mit folgendem Code Daten von einem SQL Server
Dim Cn As ADODB.Connection
Dim Rs As ADODB.Recordset
Set Cn = New ADODB.Connection
Cn.Provider = "SQLOLEDB.1"
Cn.Properties("Data Source") = "XXXX\XX"
Cn.Properties("Initial Catalog") = "YYYYY"
Cn.Properties("Integrated Security") = "SSPI"
Cn.Open
SQLCode = "SELECT * FROM Table"
Set Rs = New ADODB.Recordset
With Rs
.ActiveConnection = Cn
.CursorLocation = adUseClient
.Source = SQLCode
.Open
End With
jetzt will ich die das mehrspaltige/mehrzeilige SQL Ergebnis einer Excel Listbox DIREKT zuweisen. Also ohne Zwischentabelle, Additem usw.
Geht das? Ich habs nicht geschafft.
Vielen Dank Peter