Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein Automatisierungsobjekt zurück, mit dem Sie das VBA-Projekt (Microsoft Visual Basic für Applikationen) des Dokuments steuern können. Schreibgeschützt.
Syntax
Ausdruck verwendet werden. VBProject
Ausdruck Eine Variable, die ein Document-Objekt darstellt.
Rückgabewert
Objekt
Hinweise
Gehen Sie folgendermaßen vor, um Informationen über das zurückgegebene Objekt zu erhalten, das von der VBProject-Eigenschaft zurückgegeben wird:
So rufen Sie Informationen zu dem Objekt ab, das von der
Klicken Sie in der Gruppe Code auf der Registerkarte Entwickler auf Visual Basic.
Klicken Sie im Visual Basic-Editor im Menü Extras auf Verweise.
Klicken Sie im Dialogfeld Verweise auf Microsoft Visual Basic for Applications Extensibility 5.3, und klicken Sie dann auf OK.
Klicken Sie im Menü Ansicht auf Objektbrowser.
Wählen Sie aus der Liste Projekt/Bibliothek die Typbibliothek VBIDE aus.
Untersuchen Sie in der Liste Klassen die Klasse mit dem Namen VBProject.
Wenn das Dokument noch kein VBA-Projekt enthält, wird durch die VBProject-Eigenschaft eines erstellt.
Ab Visio 2002 löst die VBProject-Eigenschaft eine Ausnahme aus, wenn Sie in einer Umgebung mit erhöhter Sicherheit arbeiten und Ihr Systemadministrator den Zugriff auf das Visual Basic-Objektmodell blockiert hat. Es gibt keine Benutzeroberfläche oder programmgesteuerte Möglichkeit, dies zu aktivieren – der Systemadministrator muss den Zugriff aktivieren (oder deaktivieren), indem er eine Gruppenrichtlinie festlegt. Dies trägt zum Schutz vor Viren bei, die sich ausbreiten, indem auf die Visual Basic-Projekte in häufig verwendeten Vorlagen zugegriffen und der Virencode in diese eingefügt wird.
Beispiel
Dieses VBA-Makro zeigt, wie Sie die Namen von Bibliotheken, auf die in einem VBA-Projekt verwiesen wird, im Direktfenster anzeigen.
Stellen Sie vor dem Ausführen dieses Codes sicher, dass das Kontrollkästchen "Zugriff auf das VBA-Projektobjektmodell vertrauen " unter "Entwicklermakroeinstellungen " auf der Seite " Makroeinstellungen " des Dialogfelds "Trust Center " aktiviert ist (klicken Sie auf die Registerkarte "Datei ", dann auf "Optionen", dann auf "Trust Center" und dann auf "Trust Center-Einstellungen").
Public Sub VBProject_Example()
Dim varThisProject As Variant
Dim intReferences As Integer
Set varThisProject = ThisDocument.VBProject
intReferences = varThisProject.References.Count
While intReferences > 0
Debug.Print varThisProject.References(intReferences).Name
intReferences = intReferences - 1
Wend
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.