Project.ProjectGuideContent 屬性 (Project)
取得或設定正在使用的 [專案快速入門的 XML 結構描述名稱。 讀取/寫入的 String。
語法
expression。 ProjectGuideContent
表達 代表 Project 物件的變數。
註解
注意事項
[!注意事項] Project中已被取代 「 專案快速入門。 而不是 「 專案快速入門我們建議您建立工作窗格應用程式。
不過,您仍可以使用自訂 Project 指南並從Project SDK 下載取得預設 Project 指南檔案。 專案快速入門檔案會修改為在一般資料夾結構中存取,並移除 gbui://
通訊協定 (gbui 是 Office Project 2007 和舊版中以目標為基礎的使用者介面通訊協定) 。 必須以程式設計方式進行專案快速入門的所有設定。
ProjectGuideFunctionalLayoutPage屬性的預設值為 gbui://mainpage.htm
,因為 Project 未實作通訊協定, gbui://
所以無法運作。 Project 程式設計部落格 ( https://blogs.msdn.com/project_programmability/
) 包含說明如何使用 [專案快速入門的 VBA 巨集及增益集開發與 Visual C# 中Visual Studio 2010的 Microsoft Office 開發工具中的文章。
範例
下列程式碼範例會變更預設內容的使用者所指定之 XML 檔案的 [專案快速入門。 輸入的方塊會提示使用者輸入自訂專案快速入門內容的路徑和檔案名稱。
注意事項
執行此宏之前,請將 路徑 變更為您想要使用的範例路徑,並將 檔案名 變更為範例檔案的名稱,例如custom.xml。
Sub UseCustomProjectGuide()
If Projects.Count = 0 Then
MsgBox "You must have at least one active project open."
Exit Sub
End If
Dim ProjectGuideURL As String
ProjectGuideURL = InputBox$(Prompt:="Enter the path and " _
& "file name of the XML file for custom Project " _
& "Guide content." & Chr(13) _
& "For example, path \filename ")
If ProjectGuideURL = Empty Then
Exit Sub
Else
ActiveProject.ProjectGuideUseDefaultContent = False
ActiveProject.ProjectGuideContent = ProjectGuideURL
MsgBox Prompt:="The custom Project Guide content " _
& "defined in " & ProjectGuideURL & " is " _
& "now in use for the current project."
End If
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。