Hi Someone can help me ?

I want format this comment using BOLD and COLOR

Range("A1").Select
Range("A1").AddComment
Range("A1").Comment.Visible = False
Range("A1").Comment.Text Text:="MRN:" & Chr(10) & "My Code"
Range("A1").Select

Thanks!