VBA Editor: Data fra tabel kolonne.

Jeg vil gerne hente data fra en tabel og har prøvet med følgende kode:

Jeg har prøvet med:

    Dim rRS As Recordset, sSQL$, lX&, sData$, iMin&, iMax&, iCount%
    sSQL = "SELECT * FROM " & "Observations" ' & ";"
    Set rRS = CurrentDb.OpenRecordset(sSQL)
    lX = 1  ' initialize x
    With rRS
        If Not .BOF Then .MoveFirst
        While Not .EOF
            .MoveNext
            lX = lX + 1
        Wend
    End With

Men får fejlen:
"Type Mismatch" i linien    Set rRS = CurrentDb.OpenRecordset(sSQL)

Hvad er der galt?