Collage special commentaire

Bonjour j aimerai coller un commentaire dans plusieurs onglets. Mais cette possibilité n est pas cochable.

Pouvez-vous m aider?

Merci

Bonjour,

Voici un exemple,

Sub test()
Sheets("Feuil1").Range("A1").Copy
  For Each f In Sheets(Array("Feuil2", "Feuil3"))
    f.Range("A1").PasteSpecial Paste:=xlPasteComments
  Next
Application.CutCopyMode = False
End Sub

Bonjour Merci bcp

Il n y a pas d autre moyen ?

Pourquoi il m est impossible de cocher commentaire dans collage special?

Je demande car il faudra surement que je mette mon outil ensuite sous ooo.

Je vais voir comment rentrer ton code en attendant merci

ps: je viens d'ouvrir votre fichier, et en fait cela copie lorsque je clique sur le message , c'est normal?

Bonjour,

je viens d'ouvrir votre fichier, et en fait cela copie lorsque je clique sur le message , c'est normal?

oui, le message est en fait un bouton qui exécute la macro test

Pourquoi il m est impossible de cocher commentaire dans collage special?

la cellule que vous avez copier contient bien un commentaire ?

oui oui

je dans la cellule par exemple : calcul de congés payés et j'y ai un commentaire du style à prendre en compte si............

j'ignore comment insérer un fichier, je vais chercher ainsi qu'une image