macro d'impression très lente

[amolcard]

Bonjour le forum,

J'ai un petit problème, j'ai fait une macro pour imprimer mais elle est extrêmement lente (plus de 5 secondes de traitement), y-a t-il un problème dans mon code ?

Sub Impressionrapport()

ActiveSheet.PageSetup.PrintArea = "$A$1:$F$54"
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = "Préparé par AM &D"
.RightFooter = "Page &P"
.LeftMargin = Application.InchesToPoints(0.4)
.RightMargin = Application.InchesToPoints(0.4)
.TopMargin = Application.InchesToPoints(0.4)
.BottomMargin = Application.InchesToPoints(0.4)
.HeaderMargin = Application.InchesToPoints(0.5)
.FooterMargin = Application.InchesToPoints(0.5)
.PrintHeadings = False
.PrintGridlines = False
.PrintComments = xlPrintNoComments
.PrintQuality = 300
.CenterHorizontally = False
.CenterVertically = False
.Orientation = xlPortrait
.Draft = False
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
.BlackAndWhite = False
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintErrors = xlPrintErrorsDisplayed
End With
ActiveWindow.SelectedSheets.PrintPreview
End Sub


Merci d'avance !

 

[ERIC S]

Re : macro d'impression très lente

Bonjour

je ne sais pas trop mais peut-être le printpreview est-il plus lent qu'un printout.

Est-ce ta macro qui est lente ou bien la mise en forme du document?

 

[amolcard]

Re : macro d'impression très lente

je pense plutot que c'est la mise en forme du document qui est lente, et oui, un printpreview c est plus lent qu'un printout :-/

 

[Alyrio]

Re : macro d'impression très lente

salut a tous les deux et au forum,


il me semble qu'en rajoutant

ceci
Application.ScreenUpdating = False
avant ton code puis cela
Application.ScreenUpdating = true après ton code ca t'aide a accelerer ton code.

 

[amolcard]

Re : macro d'impression très lente

merci Alyrio

en effet, ca accélère un peu la macro et surtout je n'ai plus de "vibrations" à l'écran pendant le traitement

Encore merci XLD 😀