Ricerca su casella di riepilogo

[Marcolotto]

ciao a tutti, ho bisogno di una mano per la ricerca di un dato sulla casella di riepilogo. Su una form ho una casella di testo dove inserire il dato da ricercare e una casella di riepilogo che ha come origine controllo una tabella. Devo semplicemente verificare che il dato esiste dentro la casella di riepilogo, questo posso farlo da query ma voglio imparare qualcosa in più su vba e quindi qui mi serve il vostro aiuto.

Questo è quello che ho in mano ma ovviamente non va, come posso fare?

For i = 0 To MiaCasellaRiepilogo.ListCount
If Me.Txt_RicercaDato.Value = Me.MiaCasellaRiepilogo.ItemData(i) Then
MsgBox "Il dato è presente"
Else
MsgBox "Dato non in lista"
Next i
End If

Grazie in anticipo