Compartilhar via


Propriedade OLEObject.ClassID (Visio)

Retorna a cadeia de caracteres de ID de classe de uma forma que representa um controle ActiveX, um objeto OLE incorporado ou vinculado. Somente leitura.

Sintaxe

expression. ClassID

Expressão Uma variável que representa um objeto OLEObject .

Valor de retorno

Cadeia de caracteres

Comentários

A propriedade ClassID levanta uma exceção se a forma não representa um controle ActiveX ou um objeto OLE 2.0 incorporado ou vinculado. uma forma representa um controle ActiveX ou um objeto OLE 2.0 incorporado ou vinculado se o bit visTypeIsOLE2 (&H8000) for definido no valor retornado por Shape. ForeignType.

ClassID retorna uma cadeia de caracteres da forma:

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

Isso identifica o aplicativo que atende o objeto. Ele pode, por exemplo, identificar um objeto incorporado em uma página do Microsoft Visio como um objeto do Microsoft Excel.

Após usar a propriedade Object para obter uma interface Automação no objeto que a forma representa, você pode querer obter a propriedade ClassID ou ProgID para determinar os métodos e as propriedades fornecidas pela interface.

Exemplo

A seguinte macro do Microsoft Visual Basic for Applications (VBA) mostra como obter a coleção OLEObjects de uma página ativa e imprime ClassID para cada objeto OLEObject na janela Immediate. O exemplo pressupõe que a página ativa contenha pelo menos um objeto OLE 2.0 incorporado ou vinculado ou um controle 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.