[búsqueda de un valor EXACTO]

¡Muchas gracias!

El argumento lookat:=xlWhole permite efectivamente buscar un valor exacto,
en oposición a lookat:=xlPart que permite buscar un valor contenido en la celda o la hoja, por defecto en ausencia de argumento.

Lamentablemente, todavía no busca el valor exacto, sino el valor contenido.

Este pequeño programa de prueba lo demuestra:

"Public Sub test()

Dim número As Integer
Dim celulatr encontrada As Range
Dim fila As Integer
Dim col As Integer

número = 8

Set celulatr encontrada = Range("A1:A5").Find(número)

fila = celulatr encontrada.Row
col = celulatr encontrada.Column

MsgBox ("encontrado : fila = " & fila & " , columna = " & col)

End Sub
"

Porque devuelve las coordenadas de una celda que contiene el número 48, ¡mientras que busco el número 8!

Hola,

En una hoja de Excel, estoy buscando seleccionar la celda que contiene la fecha de hoy al hacer clic en un CommandBox:

Aquí está el código que he puesto:

Código:

Private Sub cmd_today_Click()

Dim hoy As Date
Dim celdaEncontrada As Range
Dim fila As Integer
Dim columna As Integer

hoy = Date

Set celdaEncontrada = Range("D3:HE3").Find(hoy, lookat:=xlWhole)

If celdaEncontrada Is Nothing Then
MsgBox ("no encontrado " + Chr(13) + Str(Date))
Else
fila = celdaEncontrada.Row
col = celdaEncontrada.Column
MsgBox ("encontrado: fila = " & fila & " , columna = " & columna)
celdaEncontrada.Select
End If

End Sub

Sin embargo, la función utilizada no me encuentra ninguna celda (aunque, por supuesto, hay una celda que contiene la fecha del día...)
Por otro lado, esta celda es una fórmula (=celda de la izquierda +1)

Gracias por sus contribuciones'

@+

Cuando uses el método find entre fórmulas, debes especificar si deseas comparar tu cadena con las fórmulas o con sus resultados:

Intenta con find(today, lookin:= xlValues, lookat:= xlWhole)

Hola cel92,

Solo tienes que quitar la parte " LookIn:=xlValues" de tu código.