ShapeRange.CanvasCropLeft Method (Word)
Crops a percentage of the width of a drawing canvas from the left 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 drawing 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 left. Entering 0.1 crops ninety percent of the canvas's width from the left. |
Example
This example crops twenty-five percent of the drawing canvas's width from the left 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 CropCanvasLeft()
Dim shpCanvas As Shape
Set shpCanvas = ActiveDocument.Shapes(1)
shpCanvas.CanvasCropLeft Increment:=0.75
End Sub