[RESUELTO] Botón para buscar un registro por fecha

[jopicach]

Hola,
Estoy intentando poner un botón en un formulario que pregunte en un InpuBox que la fecha quiero buscar al ponerla me lleve al registro donde se encuentra, necesito que sea a través de un botón.
He buscado en el foro y he encontrado esta macro que pongo abajo y que funciona perfectamente, pero al parecer es solo para buscar un campo de texto y no para fecha porque da error, no se como adaptarla para que busque en una fecha.

Sub BotonFiltroNombre(Event As Object)
Dim Form As Object
Form=Event.Source.Model.Parent
Form.Filter="UPPER(""Cliente"") LIKE '%" & UCase(InputBox("Introduzca todo o parte del nombre a buscar:","BUSCAR POR NOMBRE","")) & "%'"
Form.ApplyFilter=True
Form.Reload
End Sub

Pongo el enlace de la pregunta del foro que he puesto arriba por si alguien esta interesado.
http://ooo-forums.apache.org/es/forum/v ... 57&p=13820

Gracias.

[RMG]

Hola,

Prueba cambiando esta linea. Donde pone Fecha debes poner el nombre del campo donde debe hacer el filtro.

Form.Filter="(""Fecha"" = {D '"& Format(InputBox("Introduzca la fecha","BUSCAR POR FECHA",""),"YYYY-MM-DD") & "' } )"

Saludos

[jopicach]

Hola,

Funciona perfectamente, muchísimas gracias.

Un saludo.