Excel VBA教程:AddLabel方法

创建标志。返回一个Shape对象,该对象代表新建的标志。

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

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

Orientation  MsoTextOrientation 类型,必需。标志中文本的方向。

MsoTextOrientation 可为以下 MsoTextOrientation 常量之一。
msoTextOrientationDownward
msoTextOrientationHorizontal
msoTextOrientationHorizontalRotatedFarEast
msoTextOrientationMixed
msoTextOrientationUpward
msoTextOrientationVertical
msoTextOrientationVerticalFarEast

对于所选择或安装的不同语言支持(例如:美国英语),以上某些常量可能不可用。

Left   Single 类型,必需。相对于文档的左上角,以磅为单位给出标志的左上角位置。

Top   Single 类型,必需。相对于文档的顶部,以磅为单位给出标志的左上角位置。

Width   Single 类型,必需。以磅为单位给出标志的宽度。

Height   Single 类型,必需。以磅为单位给出标志的高度。

Excel VBA教程:AddLabel方法·示例

本示例向myDocument 添加垂直标志,该标志内的文本为“Test Label”。


Set myDocument = Worksheets(1)
myDocument.Shapes.AddLabel(msoTextOrientationVertical, _
    100, 100, 60, 150) _
    .TextFrame.Characters.Text = "Test Label"

上页:Excel VBA教程:AddItem方法 下页:Excel VBA教程:AddLine方法

Excel VBA教程:AddLabel方法

Excel VBA教程:AddLine方法 Excel VBA教程:AddMemberPropertyField方法
Excel VBA教程:AddNode方法 Excel VBA教程:AddNodes方法
Excel VBA教程:AddOLEObject方法 Excel VBA教程:AddPageItem方法
Excel VBA教程:AddPicture方法 Excel VBA教程:AddPolyline方法
Excel VBA教程:AddReplacement方法 Excel VBA教程:AddSet方法
Excel VBA教程:AddShape方法 Excel VBA教程:AddTextbox方法
Excel VBA教程:AddTextEffect方法 Excel VBA教程:AddToFavorites方法
Excel VBA教程:AdvancedFilter方法 Excel VBA教程:Align方法
Excel VBA教程:Apply方法 Excel VBA教程:ApplyCustomType方法
Excel VBA教程:ApplyDataLabels方法 Excel VBA教程:ApplyNames方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号