Nombre de la celda.
Hola, quiero que me ayudes con una función que busque en un rango un valor determinado y al encontrarlo me devuelva el nombre de la celda. (Fila y columna). De antemano Gracias
Respuesta de Elsa Matilde
1
Te desarrollé esta función, pruébala a ver si es lo que necesitas.
Se copia en un módulo del Editor (Alt+F11, Insertar módulo). Luego en la celda donde quieras obtener es dirección, escribís lo siguiente:
=BUSCODIRE(celda con el dato; rango donde buscar)
Espero tus comentarios o la finalización de la consulta.
Saludos
Elsa
Function buscodire(dato As String, mirango As Range)
Dim celda As Range
For Each celda In mirango
If celda.Value = dato Then
buscodire = celda.Address(False, False) 'referencia relativa
'buscodire = celda.address 'referencia absoluta
Exit Function
End If
Next
End Function
Se copia en un módulo del Editor (Alt+F11, Insertar módulo). Luego en la celda donde quieras obtener es dirección, escribís lo siguiente:
=BUSCODIRE(celda con el dato; rango donde buscar)
Espero tus comentarios o la finalización de la consulta.
Saludos
Elsa
Function buscodire(dato As String, mirango As Range)
Dim celda As Range
For Each celda In mirango
If celda.Value = dato Then
buscodire = celda.Address(False, False) 'referencia relativa
'buscodire = celda.address 'referencia absoluta
Exit Function
End If
Next
End Function
TE recuerdo que las consultas deben ser finalizadas, marcando una puntuación y comentarios a gusto.
TE solicito que finalices la consulta.
