全部显示创建标志。返回一个 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 类型，必需。以磅为单位给出标志的高度。
本示例向 myDocument 添加垂直标志，该标志内的文本为“Test Label”。
Set myDocument = Worksheets(1)
myDocument.Shapes.AddLabel(msoTextOrientationVertical, _
100, 100, 60, 150) _
.TextFrame.Characters.Text = "Test Label"