Project) (的 Subprojects 物件

  • 發行項

包含 Subproject 物件的集合。

屬性

名稱
Application
數目
項目
Parent

範例

使用 Subprojects 集合物件

使用 子專案 (索引) ，其中 index 是子專案索引或專案摘要任務名稱，可傳回單一 Subproject 物件。 下面範例防止對主專案中指定子專案的變更自動套用於來源專案。

ActiveProject.Subprojects("Arcadia Bay Online Catalog Plan").LinkToSource = False

取得 Subprojects 集合物件

使用 Subprojects 屬性，可以傳回一個 Subprojects 集合。 如果使用中專案有任何一個子專案不在硬碟上，下面範例會警告使用者。

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

注意事項

如果您將兩個具有相同名稱的子專案新增至專案，它就會變成靜態物件，而且不會提供新增到專案之任何其他子專案的相關資訊。 即使移除其中一個類似的具名子專案，這仍會繼續進行專案檔的存續。

您可以藉由在專案中建立其中一個子專案的複本、將它放入另一個資料夾，然後再次將它新增至您的專案，來嘗試此作業。 子專案不會報告新專案，或提供之後新增至該專案之任何子專案的相關資訊。

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。