ShapeRange.CanvasCropRight method (Word)

Crops a percentage of the width of a drawing canvas from the right side of the canvas.

Syntax

expression. CanvasCropBottom( _Increment_ )

expression Required. A variable that represents a ShapeRange object.

Parameters

Name Required/Optional Data type Description
Increment Required Single The amount in percentage points of the canvas's width that you want remaining after the canvas is cropped. Entering 0.9 as the increment crops ten percent of the canvas's width from the right. Entering 0.1 crops ninety percent of the canvas's width from the right.

Example

This example crops twenty-five percent of the drawing canvas's width from the right side of the first canvas in the active document, assuming the first shape in the active document is a drawing canvas. If not, you will need to add a drawing canvas to the document using the AddCanvas method.

Sub CropCanvasRight() 
 Dim shpCanvas As Shape 
 
 Set shpCanvas = ActiveDocument.Shapes(1) 
 shpCanvas.CanvasCropRight Increment:=0.75 
End Sub

See also

ShapeRange Collection Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.