Microsoft Office Forums - View Single Post - [Solved] Word VBA: How to create a command button and trigger a function?

tinfanide · 11-22-2011, 04:26 AM

Code:

Private Sub CommandButton1_Click()

Selection.Font.Color = wdColorRed

End Sub

I couldn't link the command button with the below codes.
How can I create a command button to do the things below?

Code:

Selection.Font.Color = wdColorRed
    Selection.Font.Bold = wdToggle
    If Selection.Font.Underline = wdUnderlineNone Then
        Selection.Font.Underline = wdUnderlineSingle
    Else
        Selection.Font.Underline = wdUnderlineNone
    End If