How to enable "Distinguish style source" by default?

In Microsoft Office Word 2007 on Windows 7, the "Reveal Formatting" pane contains a check box labeled "Distinguish style source". It is initially unchecked after I start Word and open the pane by pressing Shift+F1. I would always like to see style sources. How can I make Word check the "Distinguish style source" check box by default?

I thought I could define an AutoExec macro in Normal.dotm and make that set the option, but when I recorded a macro and checked the check box, Word did not generate any executable statement in the macro. So, I don't know if this check box is exposed in the object model at all. I searched in the Object Browser but didn't find anything relevant except the wdTaskPaneRevealFormatting constant.

Might there be a a Registry value or a Group Policy setting for controlling the check box?

Using SendKeys is always a last resort but this seems to work on Word 2016:

' Works for PowerPoint 2016 but keys may need to be adapted for other versions
Sub RevelFormatDistinguishStyle()
  ' Show the Reveal Formatting Pane
  Application.TaskPanes(wdTaskPaneRevealFormatting).Visible = True
  ' Go to the pane
  SendKeys "{F6}"
  ' Tab backwards to the 1st Options control
  ' (backwards to avoid getting 'stuck' in the 'Formatting of selected text' control
  SendKeys "+{TAB}+{TAB}"
  ' Press the spacebar to tick the Distinguish style source
  SendKeys " "
End Sub

Technical Consultant at BrightCarbon | MVP | CPS

Was this reply helpful?

Sorry this didn't help.

Great! Thanks for your feedback.

How satisfied are you with this reply?

Thanks for your feedback, it helps us improve the site.

How satisfied are you with this reply?

Thanks for your feedback.

 
 

Question Info


Last updated October 5, 2021 Views 88 Applies to: