OLEObject.ClassID, propriété (Visio)

Renvoie la chaîne d’ID de classe d’une forme représentant un contrôle ActiveX ou un objet OLE lié ou incorporé. En lecture seule.

Syntaxe

expression. ClassID

Expression Variable qui représente un objet OLEObject .

Valeur renvoyée

String

Remarques

La propriété ClassID génère une exception si la forme ne représente pas un contrôle ActiveX ou un objet OLE 2.0 lié ou incorporé. Une forme représente un contrôle ActiveX ou un objet OLE 2.0 lié ou incorporé si le bit visTypeIsOLE2 (&H8000) est défini dans la valeur renvoyée par Shape. ForeignType.

ClassID renvoie une chaîne sous la forme :

{2287DC42-B167-11CE-88E9-002AFDDD917}

Cette chaîne identifie l’application qui émet l’objet. Un objet incorporé d’une page Microsoft Visio peut ainsi être identifié comme un objet Microsoft Excel.

Après avoir utilisé la propriété Object d’une forme pour obtenir une interface Automation sur l’objet que la forme représente, vous voudrez peut-être obtenir la propriété ClassID ou ProgID pour déterminer les méthodes et les propriétés fournies par l’interface.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) suivante indique comment obtenir la collection OLEObjects d'une page active et afficher le ClassID pour chaque objet OLEObject dans la fenêtre Exécution. Cet exemple implique que la page active comporte au moins un objet OLE 2.0 lié ou incorporé ou un contrôle ActiveX.

 
Public Sub ClassID_Example() 
 
 Dim intCounter As Integer 
 Dim vsoOLEObjects As Visio.OLEObjects 
 
 'Get the OLEObjects collection of the active page. 
 Set vsoOLEObjects = ActivePage.OLEObjects 
 
 'Step through the collection of OLEObjects on the page. 
 For intCounter = 1 To vsoOLEObjects.Count 
 Debug.Print vsoOLEObjects(intCounter).ClassID 
 Next intCounter 
 
End Sub

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.