Método ShapeRange.CanvasCropLeft (Word)

Corta uma porcentagem da largura de uma tela de desenho começando pela parte esquerda 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 largura 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 largura da tela começando pela esquerda. A inserção de 0,1 corta noventa por cento da largura da tela começando pela esquerda.

Exemplo

Este exemplo corta vinte e cinco % da largura da tela de desenho do lado esquerdo 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 CropCanvasLeft() 
 Dim shpCanvas As Shape 
 
 Set shpCanvas = ActiveDocument.Shapes(1) 
 shpCanvas.CanvasCropLeft Increment:=0.75 
End Sub

Confira também

Objeto da coleção ShapeRange

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.