Changing Character Color

Imagine that you are developing a document that uses text colors to signal special meanings to the reader. For instance, you may use red text to indicate what the user should type. If you are developing a document in which you use color within your text, it can be a real bother to use the menus over and over again to change text colors. In such an instance, it is helpful to have a macro that modifies the color automatically. You can assign the macro to a key combination or a toolbar button so you don't have to use the menus. The following macro changes the color of the currently selected text to red.

Sub MakeRed()
    If Selection.Type = wdSelectionNormal Or _
      Selection.Type = wdSelectionBlock Then
        Selection.Font.ColorIndex = wdRed
    Else
        Beep
    End If
End Sub

If you want to use a different color besides red, change the color assignment made in the macro. (Just change the constant wdRed to the desired color.) VBA allows you to use constants to represent colors. There are seventeen different color numbers available: