PowerPoint VBA教程:AddLabel方法

创建一个标签。返回一个代表新标签的Shape对象。

expression.AddLabel(Orientation, Left, Top, Width, Height)

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

Orientation  必选。MsoTextOrientation 类型。文本方向。这些常数中的某些可能不可用,这取决于选择或安装的语言支持(例如,U.S. English)。

MsoTextOrientation 可以是下列 MsoTextOrientation 类型常数之一。
msoTextOrientationDownward
msoTextOrientationHorizontal
msoTextOrientationHorizontalRotatedFarEast
msoTextOrientationMixed
msoTextOrientationUpward
msoTextOrientationVertical
msoTextOrientationVerticalFarEast

Left  必选。Single 类型。标签左边缘相对于幻灯片左边缘的位置(以磅为单位)。

Top  必选。Single 类型。标签上边缘相对于幻灯片上边缘的位置(以磅为单位)。

Width  必选。Single 类型。标签的宽度(以磅为单位)。

Height  必选。Single 类型。标签的高度(以磅为单位)。

VBA示例

本示例在 myDocument 中添加一个包含文本“Test Label”的垂直标签。


Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddLabel(Orientation:=msoTextOrientationVerticalFarEast, _
    Left:=100, Top:=100, Width:=60, Height:=150).TextFrame _
    .TextRange.Text = "Test Label"

上页:PowerPoint VBA教程:AddEffect方法 下页:PowerPoint VBA教程:AddLine方法

PowerPoint VBA教程:AddLabel方法

PowerPoint VBA教程:AddLine方法 PowerPoint VBA教程:AddMediaObject方法
PowerPoint VBA教程:AddNode方法 PowerPoint VBA教程:AddNodes方法
PowerPoint VBA教程:AddOLEObject方法 PowerPoint VBA教程:AddPeriods方法
PowerPoint VBA教程:AddPicture方法 PowerPoint VBA教程:AddPlaceholder方法
PowerPoint VBA教程:AddPolyline方法 PowerPoint VBA教程:AddShape方法
PowerPoint VBA教程:AddTable方法 PowerPoint VBA教程:AddTextbox方法
PowerPoint VBA教程:AddTextEffect方法 PowerPoint VBA教程:AddTitle方法
PowerPoint VBA教程:AddTitleMaster方法 PowerPoint VBA教程:AddToFavorites方法
PowerPoint VBA教程:Align方法 PowerPoint VBA教程:Apply方法
PowerPoint VBA教程:ApplyTemplate方法 PowerPoint VBA教程:Arrange方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号