Hi tesoke,
With your two macros, Macro1 applies a yellow highlight and Macro2 applies a black highlight; neither applies blue to the font. A macro to apply blue to a font might look like:
Code:
Sub Blue()
Selection.Font.ColorIndex = wdBlue
End Sub
PS: When posting code, please use the code tags, indicated by the # button on the posting menu.