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

abrogard · 06-03-2022, 02:02 PM

Quote:

Originally Posted by Charles Kenyon

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.

That looks like what I'm looking for. Thank you. I'll try getting into writing macros.
What is that 'style' ? Not the font, something different? I would like to retain the existing font but simply change color and size.