vba word 如何改变从指定内容开始到本行结束的字体颜色，如图所示，代码该如何写

    Selection.MoveRight Unit:=wdCharacter, Count:=第N个字符
    Selection.EndKey Unit:=wdLine, Extend:=wdExtend
    Selection.Font.Color = wdColorRed