System.CountryRegion Property (Word)
Returns the country/region designation of the system. Read-only WdCountry.
Syntax
expression .CountryRegion
expression Required. A variable that represents a System object.
Example
If the CountryRegion property returns wdUS, this example converts the top margin value from points to inches.
Dim sngMargin As Single
If System.CountryRegion = wdUS Then
sngMargin = ActiveDocument.PageSetup.TopMargin
MsgBox "Top margin is " & PointsToInches(sngMargin)
End If