Método Application.Resize (Word)
Dimensiona a janela do aplicativo Word ou a janela de tarefa especificada.
Sintaxe
expressão. Redimensionar (Largura, Altura)
expressão Obrigatório. Uma variável que representa um objeto Application.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Width | Obrigatório | Long | A largura da janela, em pontos. |
| Height | Obrigatório | Long | A altura da janela, em pontos. |
Comentários
Se a janela está maximizada ou minimizada, ocorrerá um erro. Use a propriedade largura ou Altura para definir a largura da janela e a altura de forma independente.
Exemplo
Este exemplo redimensiona a janela do aplicativo Microsoft Excel para 6 polegadas de largura por 4 polegadas de altura.
If Tasks.Exists("Microsoft Excel") = True Then
With Tasks("Microsoft Excel")
.WindowState = wdWindowStateNormal
.Resize Width:=InchesToPoints(6), Height:=InchesToPoints(4)
End With
End If
Este exemplo redimensiona a janela do aplicativo Word para 7 polegadas de largura por 6 polegadas de altura.
With Application
.WindowState = wdWindowStateNormal
.Resize Width:=InchesToPoints(7), Height:=InchesToPoints(6)
End With
Confira também
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.