PictureFormat.CropBottom 属性 (PowerPoint)

返回或设置从指定图片或 OLE 对象的底部裁剪下的磅值。 读/写。

语法

表达式CropBottom

表达 一个代表 PictureFormat 对象的变量。

返回值

单精度

备注

裁剪以相对于图片的原始尺寸计算。 例如,如果插入的图片,最初为 100 磅,将其高度调整为高,200 磅,然后将 CropBottom 属性设置为 50,100 磅 (而不是 50) 将裁剪图片底部。

示例

此示例在 myDocument 中第三个形状的底部裁剪了 20 磅。 要使本示例执行,第三个形状必须是图片或 OLE 对象。

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes(3).PictureFormat.CropBottom = 20

本示例将选定形状的底部裁剪用户指定的百分比,而不考虑该形状是否调整过。 为了使本示例生效,选定形状必须是图片或 OLE 对象。

percentToCrop = InputBox("What percentage do you " & _
    "want to crop off the bottom of this picture?")

Set shapeToCrop = ActiveWindow.Selection.ShapeRange(1)

With shapeToCrop.Duplicate
    .ScaleHeight 1, True
    origHeight = .Height
    .Delete
End With

cropPoints = origHeight * percentToCrop / 100

shapeToCrop.PictureFormat.CropBottom = cropPoints

另请参阅

PictureFormat 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。