Range.NoteText (Excel)
Devuelve o establece la nota asociada con la celda que se encuentra en la esquina superior izquierda del rango.
Para agregar una nota de más de 255 caracteres, utilice este método para especificar los primeros 255 caracteres y repita el proceso para adjuntar los caracteres restantes en grupos de 255 caracteres.
NoteText (Text, Start, Length)
Worksheets("Sheet1").Range("A1").NoteText "This may change!"