Word VBA教程:CanvasCropBottom方法

从画布的底部裁剪一定百分比的画布高度。

expression.CanvasCropBottom(Increment)

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

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

说明

使用 CanvasCropTop方法从顶部裁剪。

VBA示例

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


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号