Get the Document Properties of a PPT file

Problem

List the document properties for the currently open presentation

Solution

This VBA code will give you a list of all the properties and the values for any that are set:

Sub ListDocumentProperties()

    Dim docProperty As DocumentProperty
    Dim strTemp As String

    On Error Resume Next

    ' First, the Built-in properties    
    For Each docProperty In ActivePresentation.BuiltInDocumentProperties
        With docProperty
            ' since it may error if we query the value of a property with no value
            ' we build it in bits so we at least get the name
            ' even if value's not set
            strTemp = .Name & vbTab
            strTemp = strTemp & .Value
            Debug.Print strTemp
        End With
    Next docProperty

    ' And the Custom Document Properties 
    For Each docProperty In ActivePresentation.CustomDocumentProperties
        With docProperty
            ' since it may error if we query the value of a property with no value
            ' we build it in bits so we at least get the name
            ' even if value's not set
            strTemp = .Name & vbTab
            strTemp = strTemp & .Value
            Debug.Print strTemp
        End With
    Next docProperty

End Sub

See How do I use VBA code in PowerPoint? to learn how to use this example code.

Search terms:

---