Show Me the Document Properties

Problem

Word allows you to print the document properties of a document but PowerPoint has no equivalent function. What if you need a record of a presentation's properties?

Solution

This macro will create a list of the current active presentation's document properties (both built-in and custom).

Sub ExportDocProps()

Dim x As Long
On Error Resume Next
With ActivePresentation
    Debug.Print "BUILT-IN DOCUMENT PROPERTIES"
    For x = 1 To .BuiltInDocumentProperties.Count
        Debug.Print .BuiltInDocumentProperties(x).Name & vbTab & .BuiltInDocumentProperties(x).Value
    Next
    Debug.Print "CUSTOM DOCUMENT PROPERTIES"
    For x = 1 To .CustomDocumentProperties.Count
        Debug.Print .CustomDocumentProperties(x).Name & vbTab & .CustomDocumentProperties(x).Value
    Next

End With

End Sub

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

After pasting in the code, make sure that the Immediate window is visible by pressing Ctrl+G. This is where the document properties will appear.

---