Object Property

expression.Object

expression    Required. An expression that returns an OLEFormat object.

Example

This example sets the value of the first shape on the active document. For the example to work, this first shape must be an ActiveX control (for example, a check box or an option button).

With ActiveDocument.Shapes(1).OLEFormat
    .Activate
    Set myObj = .Object
End With
myObj.Value = True
		

This example adds a new ActiveX control to the active document. The example then activates the new option button and sets some of its properties.

Set myOB = ActiveDocument.Shapes _
    .AddOLEControl(ClassType:="Forms.OptionButton.1")
With myOB.OLEFormat
    .Activate
    Set myObj = .Object
End With
With myObj
    .Value = False
    .Caption = "My Caption"
    .AutoSize = True
End With