Sub Insert_Comment_Add_Background_Picture()
'Macro to insert a comment in cell A1 and then set a picture or photo as the background for that comment
Range("A1").AddComment ("Comment text goes here.")
Range("A1").Comment.Shape.Fill.UserPicture "C:\image.jpg"
End Sub