Compartilhar via


Propriedade System.HorizontalResolution (Word)

Retorna a resolução horizontal de vídeo, em pixels. Long somente leitura.

Sintaxe

expression. HorizontalResolution

Expressão Uma variável que representa um objeto 'System'.

Exemplo

Este exemplo exibe a resolução de tela atual (por exemplo, "1024 x 768").

Dim lngHorizontal As Long 
Dim lngVertical As Long 
 
lngHorizontal = System.HorizontalResolution 
lngVertical = System.VerticalResolution 
MsgBox "Resolution = " & lngHorizontal & " x " & lngVertical

Confira também

Objeto System

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.