Compartir a través de

Propiedad Project.CustomDocumentProperties (Project)

  • Artículo

Obtiene una colección DocumentProperties que representa las propiedades personalizadas del documento. Object de solo lectura.

Sintaxis

expresión. CustomDocumentProperties

Expresión Variable que representa un objeto Project .

Comentarios

Para obtener más información, vea DocumentProperties (objeto de conjunto) en la Referencia de Visual Basic de Microsoft Office.

Para usar esta propiedad, debe incluir una referencia a la biblioteca de objetos de Microsoft Office 14.0 mediante el comando de referencias en el menú Herramientas. La biblioteca de objetos contiene definiciones para los objetos de Visual Basic, propiedades, métodos y constantes que se utilizan para manipular las propiedades del documento.

Mediante la propiedad BuiltinDocumentProperties podrá devolver el conjunto de propiedades integradas del documento.

Ejemplo:

En el ejemplo siguiente, el valor de propiedad personalizada de fecha de finalización sería Nothing si la propiedad se agrega al proyecto, pero no se completa el proyecto. Antes de ejecutar el ejemplo TestDocProps, agregue algunas tareas en el activo del proyecto y asignación a un recurso.

Sub TestDocProps()
    Dim docProps As Office.DocumentProperties
    Dim docProp As Office.DocumentProperty
    Dim numProps As Integer
    
    Set docProps = ActiveProject.CustomDocumentProperties
    
    numProps = docProps.Count
    Debug.Print "Number of custom document properties: " & numProps
    
    For Each docProp In docProps
        If (docProp.Name = "Date completed") Then
            Debug.Print "Date completed: (none) "
        Else
            Debug.Print docProp.Name & vbTab & ": " & docProp.Value
        End If
    Next docProp
End Sub

A continuación se muestran los resultados de la macro TestDocProps, para un proyecto que no tiene la propiedad de fecha de finalización a agregar:

Number of custom document properties: 7
% Complete  : 0%
Cost    : $0.00
Duration    : 5 days?
Finish  : Thu 5/7/09
Start   : Fri 5/1/09
Work    : 40h
% Work Complete : 0%

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.