Note
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Renvoie une collection ObjectVerbs qui contient tous les verbes OLE pour l’objet OLE spécifié. En lecture seule.
Syntaxe
expression. ObjectVerbs
expression Variable qui représente un objet OLEFormat .
Valeur renvoyée
ObjectVerbs
Exemple
L’exemple suivant montre comment afficher tous les verbes disponibles de l’objet OLE contenus dans la forme 1 de la diapositive 2 de la présentation active. Pour que cet exemple fonctionne, la forme 1 doit être une forme qui représente un objet OLE.
With ActivePresentation.Slides(2).Shapes(1).OLEFormat
For Each v In .ObjectVerbs
MsgBox v
Next
End With
Cet exemple spécifie que l’objet OLE représenté par la forme 1 de la diapositive 2 de la présentation active s’ouvre si l’utilisateur clique dessus au cours d’un diaporama, si « Open » (Ouvrir) est l’un des verbes OLE de cet objet. Pour que cet exemple fonctionne, la forme 1 doit représenter un objet OLE.
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
Voir aussi
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.