Méthode OLEFormat.DoVerb (Publisher)

Exige qu’un objet OLE exécute l’un de ses verbes.

Syntaxe

expression. DoVerb (iVerb)

Expression Variable qui représente un objet OLEFormat .

Parameters

Nom	Requis/Facultatif	Type de données	Description
iVerb	Obligatoire	Long	Verbe à traiter.

Remarques

Utilisez la propriété ObjectVerbs pour déterminer les verbes disponibles pour un objet OLE.

Exemple

Cet exemple traite le premier verbe de la troisième forme sur la première page de la composition active (la forme doit être un objet OLE lié ou incorporé).

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

Cet exemple montre comment exécuter le verbe Ouvrir pour la troisième forme de la première page de la composition active si la forme est un objet OLE qui prend en charge le verbe Ouvrir.

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 

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.