Tester si une cellule possède un commentaire ou pasRésolu

Question

Bonjour, Je voudrais tester si une cellule a un commentaire ou pas, mais je n'y arrive aps. Pour mettre un commentaire, je fais : ActiveCell.AddComment ActiveCell.Comment.Visible = False ActiveCell.Comment.Text Text:=Code Mais ensuite, si je fais : If ActiveCell.Comment.Text = "" Then // si aucun commentaire écrit, MAIS ADDCOMMENT OUVERT Else // Si AddComment ouvert, mais aucun commentaire entré End If Moi je voudrais tester si AddComment est lancé ou pas J'ai essayé If ActiveCell.AddComment = true, ainsi que plein d'autres, rien ne marche qqun a t-il l'astuce ?? merci d'avance !

$p00ky ______________________________________________ .:: KoC-FR ::. Alliance Francophone Kings of Chaos Venez jouer au meilleur MMORPG gratuit et facile !

jpleroisse · Accepted Answer

Bonjour,

Pour tester si une cellule contient un commentaire.



Sub Commentaire()

If ActiveCell.Comment Is Nothing Then

MsgBox "Cette cellule n'as pas de commentaire"

Else

MsgBox "Commentaire d&#233;tect&#233;"

End If

End Sub



jpleroisse

cs_Sp00ky · Answer

Nickel, je trouvais pas, merci beaucoup !

$p00ky ______________________________________________ .:: KoC-FR ::. Alliance Francophone Kings of Chaos Venez jouer au meilleur MMORPG gratuit et facile !

Tester si une cellule possède un commentaire ou pas

2 réponses

Discussions similaires