How to center a page horizontally?

b0x4it · #25 11-12-2013, 06:25 PM

Quote:

Originally Posted by macropod

The display resolution is equally irrelevant, but if you really want to find out:

Code:

Private Declare Function GetSystemMetrics32 Lib "User32" _
    Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long
 
Sub GetMonitorInfo()
Dim h As Long, w As Long
h = GetSystemMetrics32(1) ' height in pixels
w = GetSystemMetrics32(0) ' width in pixels
MsgBox Format(w, "#,##0") & " wide * " & Format(h, "#,##0") & " high"
End Sub

I'll try this and let you know the result, but what is it that you think is relevant?

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Centering text horizontally in powerpoint	Microsoftenquirer1000	PowerPoint	0	10-28-2012 03:38 PM
How to Center One Line Vertically on Blank Page	SQLUSA	Word	1	08-29-2012 08:14 PM
Word doc that scroll horizontally	Golfer4588	Word	1	03-22-2012 03:55 PM
Microsoft Word 2010 - Aligning table horizontally	SWEngineer	Word Tables	4	07-20-2011 01:32 AM
Labels will only print in center of page	jferr	Word	0	04-02-2010 09:52 AM