A family of Microsoft word processing software products for creating web, email, and print documents.
To set to Bold:
Sub question_181_macro()
'
' question_181_macro Macro
'
'
Selection.Font.Size = 10
Selection.Font.Color = wdColorAutomatic
Selection.Range.HighlightColorIndex = wdYellow
Selection.Font.Bold = True
End Sub
To make it non-bold change True to False
To combine them
Sub question_181_macro()
'
' question_181_macro Macro
'
'
Selection.Font.Size = 10
Selection.Font.Color = wdColorAutomatic
Selection.Range.HighlightColorIndex = wdYellow
If Selection.Font.Bold = True Then
Selection.Font.Bold = False
Else
Selection.Font.Bold = True
End If
End Sub