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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。