Buscar data en otro libro excel

Sres. T.E.

La siguiente consulta es la siguiente:

Como obtener la dirección de una celda de un valor buscado en otro libro.

Ejemplo: En el libro actual de Nombre “Libro1.xls” la celda “A1” contiene el valor “hola”, la cual será buscada en el “Libro2 .xls”, Rango “B1:B50”.

Esto en Excel 2003.

Para que por favor me envíen el código, ya que no logro hacerlo.

1 Respuesta

Respuesta
3

"Como obtener la dirección de una celda de un valor buscado en otro libro"

Los 2 libros deben estar abiertos.

No pusiste el nombre de la hoja de cada libro, en ambos casos puse "Hoja1", debes cambiar el nombre de cada hoja en la macro:

Sub obtenercelda()
  Dim f As Range
  Dim dato As String
  '
  dato = Workbooks("Libro1").Sheets("Hoja1").Range("A1").Value
  Set f = Workbooks("Libro2").Sheets("Hoja1").Range("B1:B50").Find(dato, , xlValues, xlWhole, , , False)
  If Not f Is Nothing Then
    MsgBox "La dirección de una celda es : " & f.Address
  Else
    MsgBox "El dato no existe"
  End If
End Sub

¡Gracias! 

Por enviarme la pronta solución, el cual lo adapte a mi procedimiento.

Por eso acudo a Uds.

[No olvides la valoración!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas