Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Slow PageSetup macro
I need to loop through about 20 worksheets in one file and format them all
the same way. I basically just turned on the macro recorder to record the steps it takes to format one sheet. My macro works great except that is spends a long time on the PageSetup section. Does anyone have any idea why the code below takes so long to run or a suggestion for a better way to accomplish the same thing? With ActiveSheet.PageSetup .PrintTitleRows = "$1:$1" .PrintTitleColumns = "" End With With ActiveSheet.PageSetup .CenterHeader = "&A" .CenterFooter = "Page &P" .LeftMargin = Application.InchesToPoints(0.25) .RightMargin = Application.InchesToPoints(0.25) .TopMargin = Application.InchesToPoints(0.5) .BottomMargin = Application.InchesToPoints(0.5) .HeaderMargin = Application.InchesToPoints(0.25) .FooterMargin = Application.InchesToPoints(0.25) .PrintGridlines = True .CenterHorizontally = True .Orientation = xlPortrait .Zoom = 100 End With Thank you for your help, Judy |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
PageSetup is very slow | Excel Programming | |||
PageSetup is very slow | Excel Programming | |||
Why is this PageSetup Macro So Slow? | Excel Discussion (Misc queries) | |||
PageSetup is slow | Excel Programming | |||
PageSetup slow | Excel Programming |