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.

ActiveSheet.DisplayAutomaticPageBreaks = False

Gracias, Fer.
Esta línea que me has dejado me ha funcionado muy bien;
pero sabes qué comandos de Excel tendría que utilizar para
conseguir lo mismo (que desaparezcan esas líneas)? Yo he
probado el menú: Archivo / Área
de impresión / Borrar área de impresión ,, pero no
me ha servido.

Muchas gracias.

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.



.

Herramienta>Opciones>Ver>Opciones de Ventana>Saltos de Página

Saludos, fer

"javier" escribió en el mensaje
news:902b01c496a1$a16246d0$

ActiveSheet.DisplayAutomaticPageBreaks = False

Gracias, Fer.
Esta línea que me has dejado me ha funcionado muy bien;
pero sabes qué comandos de Excel tendría que utilizar para
conseguir lo mismo (que desaparezcan esas líneas)? Yo he
probado el menú: Archivo / Área
de impresión / Borrar área de impresión ,, pero no
me ha servido.

Muchas gracias.

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.



.

Herramienta>Opciones>Ver>Opciones de Ventana>Saltos de

Página

Saludos, fer

"javier" escribió

en el mensaje

news:902b01c496a1$a16246d0$

ActiveSheet.DisplayAutomaticPageBreaks = False

Gracias, Fer.
Esta línea que me has dejado me ha funcionado muy bien;
pero sabes qué comandos de Excel tendría que utilizar para
conseguir lo mismo (que desaparezcan esas líneas)? Yo he
probado el menú: Archivo / Área
de impresión / Borrar área de impresión ,, pero no
me ha servido.

Muchas gracias.

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.



.

.