OLEFormat.ObjectVerbs Property

Syntax

expression.ObjectVerbs

expression A variable that represents an OLEFormat object.

Return Value
ObjectVerbs

Example

This example displays all the available verbs for the OLE object contained in shape one on slide two in the active presentation. For this example to work, shape one must be a shape that represents an OLE object.

With ActivePresentation.Slides(2).Shapes(1).OLEFormat For Each v In .ObjectVerbs MsgBox v Next End With

This example specifies that the OLE object represented by shape one on slide two in the active presentation will open when it is clicked during a slide show if "Open" is one of the OLE verbs for that object. For this example to work, shape one must be a shape that represents an OLE object.

With ActivePresentation.Slides(2).Shapes(1) For Each sVerb In .OLEFormat.ObjectVerbs If sVerb = "Open" Then With .ActionSettings(ppMouseClick) .Action = ppActionOLEVerb .ActionVerb = sVerb End With Exit For End If Next End With

See also:

• OLEFormat Object
• OLEFormat Object Members
• DoVerb Method