#1
|
|||
|
|||
Macro to display Advanced Properties?
I am trying to record a macro that will do the following:
Office Button > Prepare > Properties > Document Properties > Advanced Properties > Custom Of course, when the Advanced Properties window pops up, it won't let you then click on the "stop recording" button for the macro, so you then have to close the window to click stop recording, which then generates a macro which looks like this: Code:
Sub Macro1() ' ' Macro1 Macro ' ' Application.DisplayDocumentInformationPanel = True End Sub Office Button > Prepare > Properties So, what needs to go into that macro to make it display the Advanced Properties pop-up window and then select the Custom in the Advanced Properties pop-up? *** SOLVED *** For anyone who is interested, I abandoned the macro recorder and just did this: Code:
Option Explicit Public Sub ShowDocProperties() Dim docprop As DocumentProperties Set docprop = ActiveDocument.CustomDocumentProperties Dim report As String Dim i As Integer For i = 1 To docprop.count report = report & docprop.Item(i).name & " = " & docprop.Item(i).value & vbCrLf Next Call MsgBox(report, Title:="Custom Document Properties") End Sub Last edited by XmisterIS; 04-24-2014 at 03:23 AM. Reason: Solved |
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Help with Document Properties Prompt Macro | KJJ | Word VBA | 14 | 11-10-2016 08:18 PM |
Updating Document Properties without using advanced properties dialogue | thedr9wningman | Word VBA | 3 | 01-20-2014 05:56 PM |
Macro for Advanced Filter | atwood121 | Excel Programming | 0 | 05-22-2012 07:47 PM |
Macro for printer properties | kjk20 | Word VBA | 6 | 07-19-2011 06:18 AM |
Display the properties of an embedded image | tmazzotta | PowerPoint | 0 | 02-18-2011 05:41 PM |