Page. OLEObjects-Eigenschaft (Visio)Page.OLEObjects property (Visio)

Gibt die OLEObjects -Auflistung einer Seite zurück.Returns the OLEObjects collection of a page. Schreibgeschützt.Read-only.

SyntaxSyntax

Ausdruck.expression. OLEObjects

Ausdruck Eine Variable, die ein Page -Objekt darstellt.expression A variable that represents a Page object.

RückgabewertReturn value

OLEObjectsOLEObjects

BemerkungenRemarks

Die OLEObjects -Eigenschaft gibt **** eine OLEObjects-Auflistung zurück, die alle in einem Dokument, einem Master oder einer Seite enthaltenen OLE 2,0-verknüpften oder eingebetteten Objekte oder ActiveX-Steuerelemente enthält.The OLEObjects property returns an OLEObjects collection that includes any OLE 2.0 linked or embedded objects or ActiveX controls contained in a document, master, or page.

BeispielExample

Dieses VBA-Makro (Microsoft Visual Basic für Applikationen) veranschaulicht, wie Sie **** die OLEObjects-Auflistung einer aktiven Seite abrufen und die ClassID und ProgID für jedes OLEObject -Objekt im Direktfenster drucken.This Microsoft Visual Basic for Applications (VBA) macro shows how to get the OLEObjects collection of an active page and print the ClassID and ProgID for each OLEObject object in the Immediate window. Das Beispiel setzt voraus, dass das aktive Zeichenblatt mindestens ein eingebettetes oder verknüpftes OLE 2.0-Objekt oder ein ActiveX-Steuerelement enthält.This example assumes that the active page contains at least one OLE 2.0 embedded or linked object or an ActiveX control.

 
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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.