¿Qué linea de código debo insertar para que me copie en otro libro?

Buenos días.

Resulta que en un modulo tengo el siguiente código ese código copia de una hoja a otra en un mismo libro en este caso en la Hoja10 ... Que linea de código debo insertar para que me copie en otro libro llamado "prueba".

Gracias.

Sub guardar_dato() Application.ScreenUpdating = False
With Hoja10
uf = .Range("A" & Rows.Count).End(xlUp).Row

.Range("A" & uf).Offset(1) = Range("F1")

.Range("B" & uf).Offset(1) = Range("B1")

.Range("C" & uf).Offset(1) = Range("BW41")

End With
Application.ScreenUpdating = True

End Sub

1 Respuesta

Respuesta
1

Cambia esta línea

With Hoja10

Por esta

With workbooks("Prueba").Hoja10

En el libro "Prueba" tienes que tener una hoja "Hoja10", si es otra hoja, cambia la línea por esta

With workbooks("Prueba").sheets("hojax")

Saludos. Dam
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas