Word VBA教程:AddOLEControl方法

应用于 InlineShapes对象的 AddOLEControl方法。

创建一个 ActiveX 控件(以前称为 OLE 控件)。返回代表新 ActiveX 控件的InlineShape对象。

expression.AddOLEControl(ClassType, Range)

expression   必需。该表达式返回一个 InlineShapes对象。

ClassType  Variant 类型,可选。用于要创建的 ActiveX 控件的编程标识符。

Range  Variant 类型,可选。指定一个区域,ActiveX 控件将放置在该区域的文本中。如果该区域未折叠,则 ActiveX 控件将替换该区域。如果忽略该参数,则自动放置 ActiveX 控件。

应用于 Shapes对象的 AddOLEControl方法。

创建一个 ActiveX 控件(以前称为 OLE 控件)。返回代表新 ActiveX 控件的Shape对象。

expression.AddOLEControl(ClassType, Left, Top, Width, Height, Anchor)

expression   必需。该表达式返回一个 Shapes对象。

ClassType  Variant 类型,可选。用于要创建的 ActiveX 控件的编程标识符。

Left  Variant 类型,可选。新对象的左侧边缘相对于锁定标记的位置,以磅为单位。

Top  Variant 类型,可选。新对象的上部边缘相对于锁定标记的位置,以磅为单位。

Width  Variant 类型,可选。ActiveX 控件的宽度,以磅为单位。

Height  Variant 类型,可选。ActiveX 控件的高度,以磅为单位。

Anchor  Variant 类型,可选。指定 ActiveX 控件的锁定区域。如果指定 Anchor,则锁定标记位于锁定区域第一段的起始位置。如果忽略该参数,则自动放置锁定标记,而 ActiveX 控件将相对于页面的上部边缘和左侧边缘进行定位。

说明

在 Microsoft Word 中,将 ActiveX 控件表示为 Shape对象或 InlineShape对象。若要修改 ActiveX 控件的属性,可以对指定的图形或嵌入图形使用 OLEFormat对象的 Object属性。

关于 ActiveX 控件类型的可用信息,请参阅OLE 编程标识符

VBA示例

当应用于 Shape对象时。

本示例将一个复选框添至活动文档。


ActiveDocument.Shapes.AddOLEControl ClassType:="Forms.CheckBox.1"

本示例将一个组合框添至活动文档。


ActiveDocument.Shapes.AddOLEControl ClassType:="Forms.ComboBox.1"

本示例将一个复选框添至活动文档,清除该复选框,然后为其添加标题。


Set myCB = ActiveDocument.Shapes _
    .AddOLEControl(ClassType:="Forms.CheckBox.1")
With myCB.OLEFormat.Object
    .Value = False
    .Caption = "Check if over 21"
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号