CIAO!

Io ho un db access con una sola tabella.
Ogni record equivale a un cliente ed è composto da vari campi!
In particolare vi elenco i campi:

cognome
via
comune
provincia

Io vorrei creare una ricerca nel DB in base a quei critteri (ricerca per cognome, per via, ecc ecc)

Allora nel DB ho selezionato nelle proprietà dei campi suddetti:
INDICIZZA (duplicati ammessi)

poi ho dato al bottone "Ricerca per cognome" (x esempio) il seguente codice:
codice:
Private Sub mnuRicCogn_Click()

Dim CognomeDaCercare As String
CognomeDaCercare = InputBox$("Immettere il cognome da 
ricercare:", "Ricerca nell'agenda")

If CognomeDaCercare <> "" Then
Data1.Recordset.Index = "Cognome"
Data1.Recordset.Seek "=", CognomeDaCercare

If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
Data1.Refresh

MsgBox "Cognome non trovato.", vbInformation, Me.Caption

End If
End If

End Sub
Solo ke mi da un errore...(vedi immagine allegata)

Se poi eseguo il debug su questo errore mi evidenzia il pezzo di codice che ho evidenziato su in verde e grassetto!

AIUTO!!!