Hi guys,

Below is some code that removes all Styles from the Quick Style Gallery within a word document
Please Login or Register  to view this content.

I need a Macro that will add styles that are currently used within the document's text.
i.e the Quick Style Gallery should only include Styles that have N>0 Instance(s): Styles Panel>'Right-click on a Style'> 'Select all N Instance(s)'

(I have tried Manage Styles>'Select All'>'Hide until used', however this includes quite a few Styles with N=0 that are default Styles)


Thanks,
Jimmy