全部显示

CanvasCropLeft 方法

       

从画布左侧裁剪一定百分比的画布宽度。

expression.CanvasCropBottom(Increment)

expression 必需。该表达式返回“应用于”列表中的一个对象。

Increment  Single 类型,必需。裁剪画布后所需保存的画布宽度的百分比数值。输入 0.9 作为增量从左侧裁剪画布宽度的百分之十。输入 0.1 从左侧裁剪画布宽度的百分之九十。

说明

使用 CanvasCropRight 方法从画布的右侧裁剪。

示例

假定活动文档中的第一个图形为画布的情况下,本示例从活动文档中第一块画布的左侧裁剪画布宽度的百分之二十五。如果不是这种情况,则需要使用 AddCanvas 方法在文档中添加画布。

Sub CropCanvasLeft()
    Dim shpCanvas As Shape

    Set shpCanvas = ActiveDocument.Shapes(1)
    shpCanvas.CanvasCropLeft Increment:=0.75
End Sub