Guardar archivo sin código

hola, 'anonimo/a' !

LIBRO "A": Contiene un modulo "general" que autonumera una de las celdas y despues graba este libro "A" como "B".
Pretendo que en el libro "B" no se grabe el modulo de codigo que tengo en "A"
ya que cuando abro (B), la celda se vuelve a "autonumerar", cosa que no quiero.

si no quieres que una copia de un libro se vaya con todo y modulos de codigo [del libro 'original']...
NO guardes el libro NI le cambies de nombre con un 'simple' SaveAs [en lugar de esta forma... usa algo +/- como]:

-> copia la hoja [u hojas] a un libro nuevo [SIN modulos de codigo] y guardas el libro recien creado ;)
OJO: se espera que tapoco las hojas traigan codigo en sus modulos 'de clase'
NI... que las hojas contengan objetos incrustados con vinculos a las macros en el libro 'original' ;)

p.e.

Worksheets("hoja1").Copy
ActiveWorkbook.SaveAs

o...

Worksheets(Array("hoja1", "hoja3", "hoja7")).Copy
ActiveWorkbook.SaveAs

ya despues decides si cierras ambos libros o solo uno o ninguno o... ???

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hola de nuevo,

Ante todo, muchas gracias por responder Héctor, creo que efectivamente el
problema es ese... en el libro "A" tengo un objeto gráfico al que tengo
asignada la macro y claro, al guardarlo, efectivamente se copia ese objeto
con la macro... hay alguna forma de evitar esto?

Muchas gracias de nuevo.

"Héctor Miguel" escribió:

hola, 'anonimo/a' !

> LIBRO "A": Contiene un modulo "general" que autonumera una de las celdas y despues graba este libro "A" como "B".
> Pretendo que en el libro "B" no se grabe el modulo de codigo que tengo en "A"
> ya que cuando abro (B), la celda se vuelve a "autonumerar", cosa que no quiero.

si no quieres que una copia de un libro se vaya con todo y modulos de codigo [del libro 'original']...
NO guardes el libro NI le cambies de nombre con un 'simple' SaveAs [en lugar de esta forma... usa algo +/- como]:

-> copia la hoja [u hojas] a un libro nuevo [SIN modulos de codigo] y guardas el libro recien creado ;)
OJO: se espera que tapoco las hojas traigan codigo en sus modulos 'de clase'
NI... que las hojas contengan objetos incrustados con vinculos a las macros en el libro 'original' ;)

p.e.

Worksheets("hoja1").Copy
ActiveWorkbook.SaveAs

o...

Worksheets(Array("hoja1", "hoja3", "hoja7")).Copy
ActiveWorkbook.SaveAs

ya despues decides si cierras ambos libros o solo uno o ninguno o... ???

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, ???

... creo que efectivamente el problema es ese
... en el libro "A" tengo un objeto grafico al que tengo asignada la macro y claro
... al guardarlo, efectivamente se copia ese objeto con la macro
... hay alguna forma de evitar esto?

o... le borras la asigacion de la macro al objeto incrustado...
o... [de plano] borras el objeto incrustado :-((
ANTES... de copiar la/s hoja/s al nuevo libro [obviamente] ;)

saludos,
hector.