Compartir a través de

Propiedad Page.OLEObjects (Visio)

  • Artículo

Devuelve la colección OLEObjects de una página. Solo lectura.

Sintaxis

expresión. OLEObjects

Expresión Variable que representa un objeto Page .

Valor devuelto

OLEObjects

Comentarios

La propiedad OLEObjects devuelve una colección OLEObjects que incluye los objetos vinculados o incrustados OLE 2.0 o los controles ActiveX incluidos un documento, un patrón o una página.

Ejemplo:

Esta macro de Microsoft Visual Basic para aplicaciones (VBA) muestra cómo obtener la colección OLEObjects de una página activa e imprimir las propiedades ClassID y ProgID de cada objeto OLEObject en la ventana Inmediato. En este ejemplo se da por hecho que la página activa contiene al menos un objeto incrustado o vinculado OLE 2.0 o un control ActiveX.

 
Public Sub OLEObjects_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 
 Debug.Print vsoOLEObjects(intCounter).ProgID 
 Next intCounter 
 
End Sub

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.