non riesco ad effettuare una ricerca in un database di excel con VB6
io immetto questo codice
codice:
 Dim DaCercare As String
    DaCercare = InputBox$("Immettere i dati da ricercare:", "Ricerca nel registro")
        If DaCercare <> "" Then
        Data1.Recordset.Index = "10"
        Data1.Recordset.Seek "=", DaCercare
        If Data1.Recordset.NoMatch Then
            Data1.Recordset.MoveFirst
            Data1.Refresh
            MsgBox "Dato non trovato.", vbInformation, Me.Caption
        End If
    End If
come posso fare? :master: