Collage dans un commentaire

Bonjour le forum,

J'ai un fichier Excel dans le quel il y les cellules avec des tarifs, est-il possible de Copier/Coller les infos cellules dans un commentaire de la cellule?

Merci de votre aide.

Alain.

Bonjour,

à adapter à la plage de cellules

Sub test()
For i = 1 To 10
Text = Feuil1.Cells(i, 4)
Feuil1.Cells(i, 4).AddComment Text
Next i
End Sub