Word VBA to get System Resolution

Submitted by Support on Sun, 02/22/2009 - 12:00

How to get System Resolution using VBA

Sub VBA_System_Resolution()<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

MsgBox System.HorizontalResolution & " X " & System.VerticalResolution

End Sub