Private Sub Form_Load()

Dim strConn As String
Dim Conn As New ADODB.Connection
strConn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=" & "hej.xls"
Conn.Open strConn

Dim RecSet As New ADODB.Recordset
Dim strSQL As String


RecSet.Open "Select * From [rad$A1:A4]", Conn
Do Until RecSet.EOF

Hej = RecSet(A1) <----- Varför kan man inte gör så?
MsgBox (Hej)

RecSet.MoveNext
Loop

Conn.Close
End Sub




Varför kan man inte köra RecSet("hej") i Excel-ado som i sql-ado?
Hur gör man?

Mvh Anders.

Om du skriver RecSet("hej") i sql-ado så innebär det att fältet heter "hej" eller hur?

I Excel-ado heter inte fälten "A1" osv utan första raden i Excelarket antas innehålla fältnamn. Om det som står på första raden inte är ett giltigt namn får fältet istället namnet "F1" om fältet är i första kolumnen.

Du kan ju alltid referera direkt till kolumnnumret:
Msgbox = RecSet(1)
Ger värdet i andra kolumnen (fältet)

Kan du inte förklara vad du vill åstakomma. Vi kan då ge tips och förslag på hur du kan göra detta.

Hej, tack för förklaringen Åsa, förstod själv att det var så efter ett tags pulande :)

Andreas: Det var precis det Åsa förklara som var fel.

Mvh Anders.