Nombre de cellules dont le texte n'est pas barré

bonjour;

je voudrais comptabiliser le nombre dont le contenu n'est pas barré,

cordialement

Bonjour,

une proposition (à mettre dans un module),

edit : compte les cellules dont le contenu est barré, Il faut ajouter application.volatile (comme indiqué dans la réponse de oyobrans (que je salue), car un changement de format de cellule ne provoque pas le recalcul)

Function somcond(r)
    For Each c In r
        If c.Font.Strikethrough Then ctr = ctr + 1
    Next c
    somcond = ctr
End Function

Bonjour,

Avec Application.Volatile pour que la formule soit recalculée automatiquement, et cellule.Font.Strikethrough = False pour que ce soit bien les cellules non barrées qui soient totalisées.

Public Function somcond(plage As Range)
    Application.Volatile
    Dim cellule As Range, compteur%
    For Each cellule In plage
        If cellule.Font.Strikethrough = False Then compteur = compteur + 1
    Next cellule
    somcond = compteur
End Function

Merci à tous

quelle formule dois je mettre dans la cellule ?

Bonjour

j'ai essayé ça mais la formule additionne les cellules vides aussi

4nismo2019.xlsm (16.38 Ko)

bonjour,

une proposition

Function somcond(r)
    Application.Volatile
    For Each c In r
        If c <> "" And c.Font.Strikethrough = False Then ctr = ctr + 1
    Next c
    somcond = ctr
End Function

re

je voudrais la formule qui va avec le code macro si possible

merci à toi

bonjour,

la formule que tu as mise dans ton fichier exemple initial

=somcond(B6:B8)

si ta plage est B6:B8

Bonjour;

j'ai un petit problème, mes données sont réparties dans les lignes a1:a5 , si dans ma formule je sectionne a1:a10 ( au cas ou j'aurais plus de données) le décompte prend en considération les cellules vides, aussi quand je réouvre le fichier j'ai le message #Nom s'affiche dans ma cellule de résultat, il faudra à chaque fois que je double clique dessus.

j'espère que j'ai été clair

Merci d'avance pour ton aide.

Bonjour,

voici la macro dans ton fichier exemple tu verras qu'elle fonctionne sans problème (à la restriction près qu'un changement de format ne provoque pas le recalcul).

Si tu veux plus d'aide et comme je n'ai pas envie d'utiliser ma boule de cristal merci de mettre le fichier qui pose problème.

Re;

Pafait

Merci beaucoup pour ton aide !

Rechercher des sujets similaires à "nombre texte pas barre"