Graphic.CropBottom 属性 (Excel)
返回或设置从指定图片或 OLE 对象底部裁剪的 点 数。 读/写 Single。
语法
表达式。CropBottom
表达 返回 Graphic 对象的表达式。
备注
裁剪尺寸是相对于图片的原始尺寸计算的。 例如,如果插入的图片最初为 100 磅高,请重新缩放,使其高 200 磅,然后将 CropBottom 属性设置为 50,100 磅 (不是 50) 将从图片底部裁剪。
示例
此示例在 myDocument 中第三个形状的底部裁剪了 20 磅。 仅当该图形是图片或 OLE 对象时,本示例才有效。
Set myDocument = Worksheets(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 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈