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.
Enthält eine Sammlung von Subproject-Objekten .
Eigenschaften
| Name |
|---|
| Application |
| Count |
| Item |
| Parent |
Beispiele
Verwenden des Teilprojekts-Sammlungsobjekts
Verwenden Sie Teilprojekte (Index), wobei Index der Unterprojektindex oder der Projektsammelvorgangsname ist, um ein einzelnes Teilprojektobjekt zurückzugeben. Das folgende Beispiel verhindert, dass Änderungen, die am angegebenen Teilprojekt in einem Hauptprojekt vorgenommen werden, automatisch auch im Quellprojekt vorgenommen werden.
ActiveProject.Subprojects("Arcadia Bay Online Catalog Plan").LinkToSource = False
Abrufen des Teilprojekts-Auflistungsobjekts
Verwenden Sie die Subprojects -Eigenschaft zum Zurückgeben einer Subprojects -Auflistung. Das folgende Beispiel warnt den Benutzer, wenn sich Teilprojekte des aktiven Projekts nicht auf der Festplatte befinden.
Dim SubProj As Subproject
For Each SubProj in ActiveProject.Subprojects
If UCase(Left$(SubProj.Path, 1)) <> "C" Then
MsgBox Right$(SubProj.Path, InStrRev(SubProj.Path, "\") - 1) & _
" is not on your local hard disk.", vbExclamation
End If
Next SubProj
Hinweis
Wenn Sie einem Projekt zwei Unterprojekte mit demselben Namen hinzufügen, wird es zu einem statischen Objekt, und es werden keine Informationen zu zusätzlichen Unterprojekten bereitgestellt, die Ihrem Projekt hinzugefügt werden. Dies wird für die Lebensdauer der Projektdatei fortgesetzt, auch wenn eines der ähnlich benannten Unterprojekte entfernt wird.
Sie können dies versuchen, indem Sie eine Kopie eines der Unterprojekte in Ihrem Projekt erstellen, es in einem anderen Ordner ablegen und es dann wieder zu Ihrem Projekt hinzufügen. Teilprojekte melden das neue Projekt nicht und stellen keine Informationen zu Unterprojekten bereit, die diesem Projekt anschließend hinzugefügt werden.
Siehe auch
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.