Compartir a través de

Propiedad Project.ProjectGuideUseDefaultContent (Project)

  • Artículo

True si la Guía de proyectos utiliza el contenido predeterminado. False si desea utilizar contenido personalizado para la Guía de proyectos. Boolean de lectura y escritura.

Sintaxis

expresión. ProjectGuideUseDefaultContent

Expresión Variable que representa un objeto Project .

Comentarios

Nota:

[!NOTA] La Guía de proyectos está en desuso en Project. En lugar de la Guía de proyectos, se recomienda crear tarea en aplicaciones de panel.

Sin embargo, aún puede usar a guías de proyecto personalizadas y obtener el valor predeterminado de archivos de la Guía de proyectos desde la descarga del SDK de Project. Los archivos de la Guía de proyecto se modifican para el acceso en una estructura de carpetas planas y para quitar el gbui:// protocolo (gbui es el protocolo de interfaz de usuario basado en objetivos en Office Project 2007 y versiones anteriores). Todas las configuraciones de guía de proyectos deben realizarse mediante programación.

El valor predeterminado de la propiedad ProjectGuideFunctionalLayoutPage es gbui://mainpage.htm, que no funciona porque Project no implementa el gbui:// protocolo. El blog de programación de Project ( https://blogs.msdn.com/project_programmability/) contiene artículos que muestran cómo usar a la Guía de proyectos en una macro de VBA y en un complemento que se ha desarrollado con Visual C# en las herramientas de desarrollo de Microsoft Office en Visual Studio 2010.

Ejemplo:

El siguiente ejemplo de código cambia el contenido predeterminado de la Guía de proyectos en el archivo XML especificado por el usuario. Un cuadro de entrada solicita al usuario el nombre de archivo y ruta de acceso para el contenido personalizado de guía de proyectos.

Nota:

[!NOTA] Antes de ejecutar esta macro, cambie la ruta de acceso a una ruta de acceso de ejemplo que le gustaría usar y cambie filename por el nombre de un archivo de ejemplo, como personalizado.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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.