codice:
    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"?