View Single Post
  #4   Report Post  
Mike Rodent Mike Rodent is offline
Junior Member
 
Posts: 0
Default

Quote:
Originally Posted by Cheryl Flanders View Post
You can add the Style box to the QAT and use keyboard shortcuts.
Press Alt to show the shortcut numbers for items on the QAT, type the
number, then you can use the arrow keys and Enter. You can also
manually type letters to scroll down the list to the desired style
name, then press Enter and the style is applied with no dialog box
open.

Cheryl
Just to flesh out this answer:
1. First (using Word Options -- Customize) add the "Styles..." command to the QAT (Quick Access Toolbar)
2. Then make a macro like this:

Sub mDismissStylesBox()
'
' NB assumes that the "Styles..." command has been put in the "Quick Access Toolbar"
' by Customise...
'
CommandBars("Styles").Visible = False
End Sub

3. Then assign a hotkey to this macro
4. To dismiss the box you first have to press "Escape", then the hotkey you have set. NB including a "press Escape" command in the macro doesn't work

Be aware that there are two commands available which don't use the annoyingly undismissable "Styles..." box, but instead bring up older version of style-management dialogues. Both can be assigned hotkeys:

FormatStyle "Applies, creates or modifies styles"
FormatStyleManagement "Manage your stylesheet"

To apply a hotkey to either or both of these, go to Customize Keyboard and look under the Category "Commands Not in the Ribbon" or "All Commands".