Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Obtiene o establece el nombre del esquema XML que se usa la Guía de proyectos. String de lectura y escritura.
Sintaxis
expresión. ProjectGuideContent
expresión Variable que representa un objeto Project .
Observaciones
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:
Antes de ejecutar esta macro, cambie la ruta de acceso a una ruta de acceso de ejemplo que quiera usar y cambie el nombre de archivo por el nombre de un archivo de ejemplo, como 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
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.