Copiar hoja a libro nuevo mediante código.

29/10/2006 - 21:19 por ~ jose ~ | Informe spam
Hola, que tal?

Quisiera una macro para copiar una hoja a un libro nuevo pero sin
copiar el código que contiene el módulo de la hoja.
Esta macro se tiene que ejecutar desde culaquier otra hoja pero sin
activar la que quiero copiar.

Me explico mejor con este ejemplo:
En el 'Libro1.xls' estando en la 'Hoja_cualquiera' quiero copiar la
'Hoja_a_copiar' y pegarla en un libro nuevo. La 'Hoja_a_copiar'
contiene código VB en el módulo de la hoja (creo que se dice así) y
quiero que dicho código no aparezca en el libro nuevo.
También hay que saber que la 'Hoja_a_copiar' contiene el evento
'Activate' así que hay que tener cuidado a la hora de copiarla para no
activarla y que se ejecute el código del evento.

Me he explicado?
Venga, gracias y un saludo,
jose

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
30/10/2006 - 05:00 | Informe spam
hola, jose !

... macro para copiar una hoja a un libro nuevo pero sin copiar el codigo que contiene el modulo de la hoja.
... se tiene que ejecutar desde culaquier otra hoja pero sin activar la que quiero copiar...
... ejemplo:... estando en la 'Hoja_cualquiera' quiero copiar la 'Hoja_a_copiar' y pegarla en un libro nuevo.
... en el modulo de la hoja... contiene el evento 'Activate' [...]



en un modulo de codigo 'general' ==Sub Copiar_Hoja_seleccioada_SIN_modulos_de_codigo()
With Workbooks.Add
ThisWorkbook.Worksheets("hoja_a_copiar").Cells.Copy _
Destination:=.Worksheets(1).Range("a1")
.Worksheets(1).Name = "Hoja_a_copiar"
End With
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida