Pegar varias hojas a la vez

hola Gerardo,

a) una posibilidad, si no te importa que se pegue absolutamente todo,
podria ser =>>>

seleccionar todas las hojas (ctrl pulsado y click en la pestaña de
cada hoja), y una vez seleccionadas click secundario sobre alguna de
dichas pestañas => Mover o copiar => en el cuadro 'Al libro'
seleccionas el libro de destino => Eliges la posicion si quieres en el
siguiente cuadro => seleccionas 'Crear una copia' => aceptas

en teoria te las habra copiado, incluyendo hasta configuracion de
impresio, pagina etc

b) si lo quieres por codigo podrias hacer algo parecido a (ahora mismo
no estoy seguro si me faltaria algo pero mirando la ayuda seguro que
no tendrias problemas)=>>

'' poniendolo en un modulo normal del libro de origen (puedes
cambiarlo un poco si lo prefieres en el libro de destino)

sub copiar()
Dim hj as worksheet
For each hj in thisworkbook.worksheets
hj.copy workbooks("destino.xls")
next
end sub

un saludo
Ivan

hola, Gerardo !

Tengo que copiar hojas de un libro a otro.
El libro origen esta protegido, pero igual me copia bien las hojas haciendolo de a una.
Pero si selecciono todas las hojas no me la copia.
Me pone que la seleccion del destino es diferente al origen.
Tengo que hacer algo especial para copiar ? se puede copiar ?

me da la impresion de que NO estas copiando hojas *completas* -?-
sino SOLO un rango [aunque sea el mismo] de un grupo de hojas -?-

comentas [si hubiera] algun detalle *en el tintero* ?
saludos,
hector.

hola, Gerardo !

Gracias por tu respuesta, pero fijate en la respuesta que le puse a ivan, para explicar mejor lo que necesito.-

podrias exponer *exactamente* el proceso [o los pasos] que sigues para lograr:
-> que una hoja *protegida* en el libro de origen
-> pase *desprotegida* al copiarla en el libro de destino ?

saludos,
hector.

__ las consultas anteriores __

Tengo que copiar hojas de un libro a otro.
El libro origen esta protegido, pero igual me copia bien las hojas haciendolo de a una.
Pero si selecciono todas las hojas no me la copia.
Me pone que la seleccion del destino es diferente al origen.
Tengo que hacer algo especial para copiar ? se puede copiar ?

me da la impresion de que NO estas copiando hojas *completas* -?-
sino SOLO un rango [aunque sea el mismo] de un grupo de hojas -?-

comentas [si hubiera] algun detalle *en el tintero* ?

Hola Ivan..
Hice lo que decis de seleccionar todas las hojas. El unico problema que
tengo es que si la copio de a una, pese que esta protegida en origen, en el
destino me permite cambiar las formulas (y es lo que preciso), pero si lo
hago en grupo como me decis, tambien me quedan protegidas en el destino.
Mi pregunta era como hacer en lote, el copiado como lo hago hoja por hoja.
El macro no lo probe aun.

Gracias

Gerardo


"Ivan" escribió en el mensaje
news:
hola Gerardo,

a) una posibilidad, si no te importa que se pegue absolutamente todo,
podria ser =>>>

seleccionar todas las hojas (ctrl pulsado y click en la pestaña de
cada hoja), y una vez seleccionadas click secundario sobre alguna de
dichas pestañas => Mover o copiar => en el cuadro 'Al libro'
seleccionas el libro de destino => Eliges la posicion si quieres en el
siguiente cuadro => seleccionas 'Crear una copia' => aceptas

en teoria te las habra copiado, incluyendo hasta configuracion de
impresio, pagina etc

b) si lo quieres por codigo podrias hacer algo parecido a (ahora mismo
no estoy seguro si me faltaria algo pero mirando la ayuda seguro que
no tendrias problemas)=>>

'' poniendolo en un modulo normal del libro de origen (puedes
cambiarlo un poco si lo prefieres en el libro de destino)

sub copiar()
Dim hj as worksheet
For each hj in thisworkbook.worksheets
hj.copy workbooks("destino.xls")
next
end sub

un saludo
Ivan

Gracias por tu respuesta, pero fijate en la respuesta que le puse a ivan,
para explicar mejor lo que necesito.-

Gerardo


"Héctor Miguel" escribió en el mensaje
news:

hola, Gerardo !

Tengo que copiar hojas de un libro a otro.
El libro origen esta protegido, pero igual me copia bien las hojas
haciendolo de a una.
Pero si selecciono todas las hojas no me la copia.
Me pone que la seleccion del destino es diferente al origen.
Tengo que hacer algo especial para copiar ? se puede copiar ?

me da la impresion de que NO estas copiando hojas *completas* -?-
sino SOLO un rango [aunque sea el mismo] de un grupo de hojas -?-

comentas [si hubiera] algun detalle *en el tintero* ?
saludos,
hector.