Sub FixedFontRed()
' Paul Beverley - Version 13.05.20
' Sets font to an 'almost' red font colour

Selection.Font.Color = &H1111FF
End Sub