Access - Buscar en una lista

una pregunta boba ( porque ya se me fue el avión de como hacerlo)
¿como busco en una lista un valor que tengo en una caja de texto?

Hola:

Dim i As Integer

For i = 0 To Me.Lista0.ListCount
If Me.Lista0.ItemData(i) = Me.CuadroDeTexto Then
Me.Lista0 = Me.Lista0.ItemData(i)
Exit For
End If
Next

Un saludo

Gracias mi menda, si me funcionó.

hola Enrique te puedo molestar me podrias enviar el manual de acces 2007 en español a mi correo [email protected] gracias