Project.ProjectGuideUseDefaultContent 屬性 (Project)

True 是表示 如果 [專案快速入門會使用預設的內容。 False 表示您要使用之自訂內容的 [專案快速入門。 可讀寫的 Boolean。

語法

expression。 ProjectGuideUseDefaultContent

表達 代表 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 支援與意見反應。