OVH Cloud OVH Cloud

Saut de page suite...

1 réponse
Avatar
Yvan
Bonjour,

Lorsque j'utilise les instructions suivantes, je suis quand même obligé de
cliquer sur "Aperçu des sauts de page", puis sur "Affichage normal" pour que
le traitement s'effectue.

Y-a-t-il une autre possibilité de façon à éviter toute intervention de
l'utilisateur ???

ActiveWindow.SelectedSheets.PrintPreview
ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1
ActiveWindow.SelectedSheets.PrintPreview

--
Merci pour vos réponses.

1 réponse

Avatar
isabelle
bonjour Yvan,

ActiveWindow.View = xlPageBreakPreview
ActiveWindow.View = xlNormalView

isabelle

Bonjour,

Lorsque j'utilise les instructions suivantes, je suis quand même obligé de
cliquer sur "Aperçu des sauts de page", puis sur "Affichage normal" pour que
le traitement s'effectue.

Y-a-t-il une autre possibilité de façon à éviter toute intervention de
l'utilisateur ???

ActiveWindow.SelectedSheets.PrintPreview
ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1
ActiveWindow.SelectedSheets.PrintPreview