Récupérer le contenu d'un commentaire dans une cellule
JonhyBigoudi
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
JonhyBigoudi Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
JonhyBigoudi Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bonjour, je souhaite récupérer le contenu d'un commentaire de cellule XL dans une cellule. Attention, il ne s'agit pas de recopier le commentaire sous forme d'un nouveau commentaire mais bien de vider le contenu d'un commentaire dans une cellule.
A voir également:
- Excel récupérer commentaire dans cellule
- Récupérer au terminal de fret - Forum Consommation & Internet
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
- Proteger cellule excel - Guide
- Aller à la ligne dans une cellule excel - Guide
1 réponse
Bonjour,
sans précision de ta part je fais la plage sélectionnée :
je colle dans la colonne à droite, en insérer une si besoin ou adapter le code.
eric
sans précision de ta part je fais la plage sélectionnée :
Sub comment()
Dim pl As Range, c As Range
On Error GoTo fin
Set pl = Selection.SpecialCells(xlCellTypeComments)
For Each c In pl
c.Offset(, 1) = c.comment.Text ' copie commentaire
c.comment.Delete ' supp commentaire
Next c
fin:
End Sub
je colle dans la colonne à droite, en insérer une si besoin ou adapter le code.
eric
JonhyBigoudi
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
Merci beaucoup Eric pour cette réponse très rapide.