Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

insérer ds le commentaire

1 réponse
Avatar
PortHorel
bonjour je souhaite copier le contenu d'une cellule dans le commentaire
et ce pour toute une collone est faisable ?
à bientôt

1 réponse

Avatar
JB
Bonjour,

Texte à ajouter en colonne B

Sub AjouteCommentaire()
[A:A].ClearComments
For Each c In Range("B2", [B65000].End(xlUp))
c.Offset(0, -2).AddComment c.Value
c.Offset(0, -2).Comment.Visible = True
c.Offset(0, -2).Comment.Shape.Select
Selection.AutoSize = True
c.Offset(0, -2).Comment.Visible = False
Next c
End Sub

http://boisgontierjacques.free.fr/pages_site/commentaire.htm#InsereComment" target="_blank" class="text-blue hover:opacity-90 " style="word-break: break-all;" rel="noopener nofollow">http://boisgontierjacques.free.fr/pages_site/commentaire.htm#InsereComment

JB
http://boisgontierjacques.free.fr


On 3 fév, 09:24, PortHorel wrote:
bonjour je souhaite copier le contenu d'une cellule dans le commentaire
et ce pour toute une collone est faisable ?
à bientôt