Subprojects object (Project)
Contains a collection of Subproject objects.
Properties
| Name |
|---|
| Application |
| Count |
| Item |
| Parent |
Examples
Using the Subprojects collection object
Use Subprojects (index), where index is the subproject index or project summary task name, to return a single Subproject object. The following example prevents changes made to the specified subproject in a master project from being automatically made to the source project.
ActiveProject.Subprojects("Arcadia Bay Online Catalog Plan").LinkToSource = False
Getting the Subprojects collection object
Use the Subprojects property to return a Subprojects collection. The following example cautions the user if any of the subprojects in the active project are not on the hard disk.
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
Note
If you add two subprojects with the same name to a project, it will become a static object, and will not provide information about any additional subprojects that are added to your project. This continues for the life of the project file, even if one of the similarly named subprojects is removed.
You can try this by making a copy of one of the subprojects in your project, placing it into another folder, and then adding it to your project again. Subprojects will not report the new project, or provide information about any subprojects that are added to that project afterwards.
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.