Microsoft Office Forums - View Single Post - How To Select and Change Color with Keyboard Shortcuts?

Charles Kenyon · 06-03-2022, 01:55 PM

Otherwise, start writing macros to assign the color you want and increase the size.

Code:

Sub FontRedPlusFour()
   Selection.Style = "RedChar"
   Selection.Font.Size = Selection.Font.Size + 4
End Sub

The above would use the character style RedChar (a custom style) and then increase the font size by four points. You can assign a keyboard shortcut to this. It is important that the style comes before the size change.

If you always wanted Red size 16 you would simply do that through your character style.