Borrar líneas de Vista priliminar.

Hola Javier:

No se si te referís a esto:

ActiveSheet.DisplayAutomaticPageBreaks=False

Saludos, fer



"javier" escribió en el mensaje
news:094e01c4966d$0fba0f30$
Sub Macro4()
ActiveSheet.PageSetup.PrintArea = "$B$2:$Q$29"
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
Collate:=True
ActiveSheet.PageSetup.PrintArea = ""

End Sub

Saludos a todos:
Estaba intentando utilizar éste código para imprimir
el "Área de impresión": B2: Q29
El problema es, que después de pasar la macro me queda
señalada con líneas discontinuas otras "Áreas de
impresión". Igual que cuando sigo el menú: Archivo /
Vista preliminar. Simplemente quería saber con qué código
podría hacer desaparecer esas líneas discontinuas. Y con
qué menú de comandos? He probado el menú: Archivo / Área
de impresión / Borrar área de impresión ,, pero no
borra ésas líneas.

Si me lo podéis decir os lo agradezco.
Saludos.