System.HorizontalResolution property (Word)
Returns the horizontal display resolution, in pixels. Read-only Long.
Syntax
expression. HorizontalResolution
expression A variable that represents a 'System' object.
Example
This example displays the current screen resolution (for example, "1024 x 768").
Dim lngHorizontal As Long
Dim lngVertical As Long
lngHorizontal = System.HorizontalResolution
lngVertical = System.VerticalResolution
MsgBox "Resolution = " & lngHorizontal & " x " & lngVertical
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for