PowerPoint VBA教程:BoundTop属性

以磅为单位返回指定文本框的文本文本边界框的上边界到幻灯片的上边界的距离。只读。Single 类型。

VBA示例

本示例在当前演示文稿的第一张幻灯片中添加一个圆角矩形,该矩形与第一个形状的文本边界框的大小相同。


With Application.ActivePresentation.Slides(1).Shapes
    Set tr = .Item(1).TextFrame.TextRange
    Set roundRect = .AddShape(msoShapeRoundedRectangle, _
        tr.BoundLeft, tr.BoundTop, tr.BoundWidth, tr.BoundHeight)
End With
With roundRect.Fill
    .ForeColor.RGB = RGB(255, 0, 128)
    .Transparency = 0.75
End With

上页:PowerPoint VBA教程:BoundLeft属性 下页:PowerPoint VBA教程:BoundWidth属性

PowerPoint VBA教程:BoundTop属性

PowerPoint VBA教程:BoundWidth属性 PowerPoint VBA教程:Brightness属性
PowerPoint VBA教程:Build属性 PowerPoint VBA教程:BuildByLevelEffect属性
PowerPoint VBA教程:BuiltInDocumentProperties属性 PowerPoint VBA教程:Bullet属性
PowerPoint VBA教程:By属性 PowerPoint VBA教程:ByX属性
PowerPoint VBA教程:ByY属性 PowerPoint VBA教程:Callout属性
PowerPoint VBA教程:Caption属性 PowerPoint VBA教程:Cells属性
PowerPoint VBA教程:Character属性 PowerPoint VBA教程:ChartUnitEffect属性
PowerPoint VBA教程:CheckIfOfficeIsHTMLEditor属性 PowerPoint VBA教程:Child属性
PowerPoint VBA教程:Children属性 PowerPoint VBA教程:ChildShapeRange属性
PowerPoint VBA教程:Collate属性 PowerPoint VBA教程:Color属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号