You can place the properties you want on a empty sheet and print it
Run this macro on a empty sheet
Sub test()
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.BuiltinDocumentProperties
On Error Resume Next
Cells(rw, 1).Value = p.Name
Cells(rw, 2).Value = p.Value
rw = rw + 1
On Error GoTo 0
Next
End Sub
--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl
"Sandi" <(E-Mail Removed)> wrote in message news:015e01c3b000$ac6a1db0$(E-Mail Removed)...
> Any idea of how I can get the document properties of an
> Excel worksheet to print?