[Access e DAO] errore strano

[longline]

    Dim db As Database
    Dim rs As Recordset
    Set db = CurrentDb
    Set rs = db.OpenRecordset("Agenzie")

Perchè l'ultima riga mi dà errore "Errore di run-time'13' Tipo non corrispondente"?