Thread
:
PageSetup calls are slow
View Single Post
#
3
Posted to microsoft.public.excel.programming
JE McGimpsey
external usenet poster
Posts: 4,624
PageSetup calls are slow
VBA accesses to the PageSetup object are painfully slow. You can speed
it up dramatically by using XL4M call. Take a look he
http://www.mcgimpsey.com/excel/udfs/pagesetup.html
In article ,
(Stan) wrote:
The code below takes nearly 11 seconds to run; this is on a WinXP with
a P4 at 1.2 GHz, 512MB RAM, oceans of free disk space and Excel 2002.
Experiments with various lines commented out show that each line
requires an astonishing 1.2 seconds to run, except the last three
(.Zoom and the two .FitToPages? lines), which execute all but
instantaneously.
Other open programs, available RAM, all the usual suspects for slow
code don't seem to matter here; I get very constant results from
checking the timer before and after this code runs -- even in an empty
workbook with nothing else open.
Any tips on speeding this up?
Thanks!
Stan
With ActiveSheet.PageSetup
'margins are measured in points, 72 points to the inch
.LeftMargin = 36
.RightMargin = 36
.TopMargin = 36
.BottomMargin = 36
.HeaderMargin = 0
.FooterMargin = 0
.CenterHorizontally = False
.CenterVertically = False
.Orientation = xlLandscape
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = False
End With
Reply With Quote
JE McGimpsey
View Public Profile
Find all posts by JE McGimpsey