Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/03/2007, 12:32
Avatar de mrocf
mrocf
 
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 7 meses
Puntos: 88
Excel VBA. ¿como hago para buscar datos de otro libro?

No sé si estoy entendiendo adecuadamente tu necesidad. Sin embargo, comienzo por mostrarte el siguiente código:
Código:
Sub Macro1()
    Workbooks.Open FileName:="C:\Libro2.xls"
    Sheets("Prueba").Select
    Cells.Find(What:=DNI, After:=ActiveCell, LookIn:=xlValues, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False).Activate
    Range(Selection.Offset(0, 1), Selection.Offset(0, 4)).Copy
    ActiveWindow.Close SaveChanges:=False
    ActiveSheet.Paste Destination:=[A5]
End Sub
En él:
a) abrimos el libro "Libro2.xls"
b) Pasamos a la hoja "Prueba"
c) Buscamos la información "DNI"
d) opiamos un rango de 4 celdas a la derecha del dato hallado
e) cerramos "Libro2.xls"
f) pegamos lo copiado a partir de la celda "A5".

¿Es ésto lo que estás buscando? ¿Alguna otra cosa?

Saludos