Project.ProjectGuideUseDefaultContent 属性 (Project)
如此 如果项目指南使用默认内容。 假 如果您想要使用项目向导的自定义内容。 读/写 Boolean。
语法
expression。 ProjectGuideUseDefaultContent
表达 一个代表 Project 对象的变量。
备注
注意
[!注释] 在Project中,项目指南已被否决。 而不是项目指南中,我们建议创建任务窗格的应用程序。
但是,仍然可以使用自定义项目指南和Project SDK 下载中获取默认项目指南文件。 修改项目指南文件以在平面文件夹结构中访问,删除 gbui://
协议 (gbui 是 Office Project 2007 和早期版本中基于目标的用户界面协议) 。 必须以编程方式进行所有项目向导设置。
ProjectGuideFunctionalLayoutPage 属性的默认值为 gbui://mainpage.htm
,这不起作用,因为 Project 不实现gbui://
协议。 项目编程博客 ( https://blogs.msdn.com/project_programmability/
) 包括文章说明如何在开发 Visual C# 与Visual Studio 2010在 Microsoft Office 开发工具中的外接程序中的 VBA 宏使用项目指南。
示例
下面的代码示例的默认内容更改为用户指定的 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。