Récupérer le contenu d'un commentaire dans une cellule
Fermé
JonhyBigoudi
Messages postés
2
Date d'inscription
jeudi 24 octobre 2019
Statut
Membre
Dernière intervention
25 octobre 2019
-
24 oct. 2019 à 13:33
JonhyBigoudi Messages postés 2 Date d'inscription jeudi 24 octobre 2019 Statut Membre Dernière intervention 25 octobre 2019 - 25 oct. 2019 à 09:08
JonhyBigoudi Messages postés 2 Date d'inscription jeudi 24 octobre 2019 Statut Membre Dernière intervention 25 octobre 2019 - 25 oct. 2019 à 09:08
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
- Excel cellule couleur si condition texte - Guide
- Aller à la ligne dans une cellule excel - Guide
- Liste déroulante excel - Guide
- Recuperer message whatsapp supprimé - Guide
- Proteger cellule excel - Guide
1 réponse
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 255
Modifié le 24 oct. 2019 à 13:51
Modifié le 24 oct. 2019 à 13:51
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
25 oct. 2019 à 09:08