Microsoft Office Forums - View Single Post - [Solved] How to center a page horizontally?

b0x4it · 11-11-2013, 03:35 PM

Quote:

Originally Posted by macropod

Simple! Delete:

Code:

Dim lZoom As Long

and:

Code:

'Get the full-screen zoom
lZoom = .Percentage
'Set zoom % to 250% min
If .Percentage < 250 Then .Percentage = 250

and:

Code:

'Center the page
.ActivePane.HorizontalPercentScrolled = (250 - lZoom) / 5

If you delete these codes, then how it scrolls horizontally to the centre?