Consulta sobre copiar datos de un archivo a otro

Hola una consultafunción para que en ves de que me lo guarde dentro del mismo libro en la hoja2, me lo guarde en otro excel donde quiero poner juntas todas las bases de datos.</span>

Yo uso esta funcion.

Worksheets("Hoja2").Select
Range("a60000").End(xlUp).Offset(1, 0).Select
ActiveCell.Offset(0, 0) = Worksheets("Hoja1").Range("A1")
ActiveCell.Offset(0, 1) = Worksheets("Hoja1").Range("A2")

lo que quiero que en vez de guardar en hoja2 lo guarde en "otro.xlsx/hoja2"

1 Respuesta

Respuesta
1

Si el otro libro ya está abierto, solo hace falta activarlo

Workbooks("Libro2.xlsx").activate

ActiveWorkbook.Sheets("Hoja2").Select

Y aquí sigue lo tuyo.

Si necesitas abrirlo antes avisame que te paso las instrucciones que faltan.

Te recuerdo que hay varios modos de copiar, no necesariamente tenés que posicionarte en el libro destino... te invito a leer más sobre el tema en la sección Macros de mi libro o en la demo del nuevo manual Programación VBA 2007-2010 (se presentan los 3 1ros cap desarrollados)

:

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas