Свойство Project.ProjectGuideUseDefaultContent (Project)

Значение true , если в руководстве проекта используется содержимое по умолчанию. Значение False , если вы хотите использовать пользовательское содержимое для руководства проекта. Для чтения и записи, Boolean.

Синтаксис

выражение. ProjectGuideUseDefaultContent

Выражение Переменная, представляющая объект Project .

Замечания

Примечание.

Руководство по проекту не рекомендуется в Project. Вместо руководства по проекту рекомендуется создавать приложения области задач.

Однако вы по-прежнему можете использовать пользовательские руководства проектов и получать файлы руководства по умолчанию из пакета SDK для Project. Файлы руководства проекта изменяются для доступа к неструктурированным папкам и для удаления gbui:// протокола (gbui — это протокол пользовательского интерфейса на основе целей в Office Project 2007 и предыдущих версиях). Все параметры руководства проекта должны быть заданы программным способом.

Значение по умолчанию свойства ProjectGuideFunctionalLayoutPage — gbui://mainpage.htm, которое не работает, так как Project не реализует gbui:// протокол. Блог Project Programmability ( https://blogs.msdn.com/project_programmability/) содержит статьи, в которые показано, как использовать руководство по проекту в макросе VBA и надстройке, разработанной с помощью Visual C# в средствах разработки Microsoft Office в Visual Studio 2010.

Пример

В следующем примере кода содержимое по умолчанию для руководства проекта изменяется на 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 и обратная связь.