Método ShapeRange.CanvasCropBottom (Word)
Corta uma porcentagem da altura de uma tela de desenho começando pela parte inferior da tela.
Sintaxe
expression. CanvasCropBottom( _Increment_ )
expressão Obrigatório. Uma variável que representa um objeto ShapeRange.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Increment | Obrigatório | Single | A altura em pontos percentuais de uma tela de desenho que você deseja que permaneça após o corte da tela. A inserção de 0,9 como incremento corta dez por cento da altura da tela começando pela parte inferior. A inserção de 0,1 corta noventa por cento da altura da tela começando pela parte inferior. |
Exemplo
Este exemplo corta vinte e cinco % da altura da tela de desenho a partir da parte inferior da primeira tela do documento ativo, assumindo que a primeira forma no documento ativo é uma tela de desenho. Caso contrário, você precisará adicionar uma tela de desenho no documento usando o método AddCanvas.
Sub CropCanvasBottom()
Dim shpCanvas As Shape
Set shpCanvas = ActiveDocument.Shapes(1)
shpCanvas.CanvasCropBottom Increment:=0.75
End Sub
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.