[Fonction] Compter les cellules avec commentaire Fermé

Question

Bonjour à tous,

Je susi à la recherche d'une fonction excel, me permettant de calculer le nombre de cellule avec un commentaire dans une plage donnée,

Merci par avance pour votre aide,

 



Configuration: Windows 7 / Chrome 43.0.2357.124

via55 · Answer

Bonjour

Fonction personnalisée à mettre dans un module (ALT+F11 pour ouvrir Editeur puis Insertion et Module - Copier coller la macro et fermer éditeur
La fonction s'utilise comme toute fonction excel en utilisant son nom, dans une cellule mettre =nb_com()
Function nb_com()
Set f = ActiveSheet
  For Each c In f.Comments
     nc = nc + 1
    Next c
  nb_com = nc
End Function

Cdlmnt
Via

eriiic · Answer

Bonjour,

ou bien :
Function nbComments(plage As Range) As Long    Dim c As Range    For Each c In plage        If Not c.Comment Is Nothing Then nbComments = nbComments + 1    Next cEnd Function 
Syntaxe : =nbComments(B3:D7)
Faire F9 pour rafraichir, la rendre volatile n'y changerait rien

eric

Ataraxie · Answer

Merci beaucoup à vous deux,

[Fonction] Compter les cellules avec commentaire

3 réponses

Discussions similaires