System object (Word)
Contains information about the computer system.
Use the System property to return the System object. If the operating system is Windows, the following example makes a network connection to \Project\Info.
If System.OperatingSystem = "Windows" Then
System.Connect Path:="\\Project\Info"
End If
The following example displays the current screen resolution (for example, "1024 x 768").
horz = System.HorizontalResolution
vert = System.VerticalResolution
MsgBox "Resolution = " & horz & " x " & vert
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.