[Fonction] Compter les cellules avec commentaire

Ataraxie -  
 Ataraxie -
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,





A voir également:

3 réponses

via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
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 c
End Function

Syntaxe : =nbComments(B3:D7)
Faire F9 pour rafraichir, la rendre volatile n'y changerait rien

eric

0
Ataraxie
 
Merci beaucoup à vous deux,
0