Método OLEFormat.DoVerb (Publisher)

Solicita que un objeto OLE ejecute uno de sus verbos.

Sintaxis

expresión. DoVerb (iVerb)

Expresión Variable que representa un objeto OLEFormat .

Parameters

Comentarios

Utilice la propiedad ObjectVerbs para determinar los verbos disponibles para un objeto OLE.

Ejemplo:

En este ejemplo se ejecuta el primer verbo para la tercera forma de la primera página de la publicación activa si la forma es un objeto OLE vinculado o incrustado.

With ActiveDocument.Pages(1).Shapes(3) 
 If .Type = pbEmbeddedOLEObject Or _ 
 .Type = pbLinkedOLEObject Then 
 .OLEFormat.DoVerb (1) 
 End If 
End With

En este ejemplo se realiza el verbo Abrir para la tercera forma de la primera página de la publicación activa si la forma es un objeto OLE que admite el verbo Open.

Dim strVerb As String 
Dim intVerb As Integer 
 
With ActiveDocument.Pages(1).Shapes(3) 
 
 ' Verify that the shape is an OLE object. 
 If .Type = pbEmbeddedOLEObject Or _ 
 .Type = pbLinkedOLEObject Then 
 
 ' Loop through the ObjectVerbs collection 
 ' until the "Open" verb is found. 
 For Each strVerb In .OLEFormat.ObjectVerbs 
 intVerb = intVerb + 1 
 If strVerb = "Open" Then 
 
 ' Perform the "Open" verb. 
 .OLEFormat.DoVerb iVerb:=intVerb 
 Exit For 
 End If 
 Next strVerb 
 End If 
End With 

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.