Método Shape.GetWidth (Publisher)
Retorna a largura da forma ou do intervalo de formas como um Single nas unidades especificadas.
Sintaxe
expressão. GetWidth (Unidade)
Expressão Uma variável que representa um objeto Shape .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Unit | Obrigatório | PbUnitType | A unidade na qual a largura deve ser retornada. Pode ser uma das constantes PbUnitType declaradas na biblioteca de tipos do Microsoft Publisher. |
Valor de retorno
Único
Comentários
Use o método GetHeight para retornar a altura de uma forma ou intervalo de formas.
Exemplo
O exemplo a seguir exibe a altura e a largura em polegadas (até o centésimo mais próximo) do intervalo de formas que abrange todas as formas da primeira página da publicação ativa.
With ActiveDocument.Pages(1).Shapes.Range
MsgBox "Height of all shapes: " _
& Format(.GetHeight(Unit:=pbUnitInch), "0.00") _
& " in" & vbCr _
& "Width of all shapes: " _
& Format(.GetWidth(Unit:=pbUnitInch), "0.00") _
& " in"
End With
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.