XL 2019 Compter combien de fois un mot est sur une ligne et au debut du texte

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 18 Novembre 2023

• #2

Bonjour Carlos,
Un essai en PJ avec une colonne supplémentaire et :

Code:

Par ligne : =NB.SI(B1:F1;"CA1*")
Total     : =NB.SI(G:G;">0")

 

Pièces jointes

• NBCA1.xlsx

  8.9 KB · Affichages: 3

Vote positif 0 Vote négatif

patty58

XLDnaute Occasionnel

• 18 Novembre 2023

• #3

Bonjour à tous

Essaie cette formule :
=SOMME(NB.SI(B1:B64000;"CA1*");NB.SI(D164000;"CA1*");NB.SI(F1:F64000;"CA1*")) en J8

Bonne fin de journée

 

Vote positif 0 Vote négatif

patty58

XLDnaute Occasionnel

• 18 Novembre 2023

• #4

Excuse
=SOMME(NB.SI(B1:B64000;"CA1*");NB.SI(D164000;"CA1*");NB.SI(F1:F64000;"CA1*"))

 

Vote positif 0 Vote négatif

patty58

XLDnaute Occasionnel

• 18 Novembre 2023

• #5

A la place de l'émoticône : "" (de D1 à D64000)

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 18 Novembre 2023

• #6

Re, Bonjour Patty,

carlos à dit:

Rq : si il est x fois sur une ligne on ne le compte qu'une seule fois.

Cliquez pour agrandir...

Si "CA1*" apparait plusieurs fois sur une ligne, il ne compte qu'une fois.

Un autre essai sans colonne supplémentaire avec une petite fonction perso en VBA :

VB:

Function Compte(Plage, Chaine)
Application.Volatile: T = Plage
For L = 1 To UBound(T)
    For C = 1 To UBound(T, 2)
        If T(L, C) Like Chaine & "*" Then Compte = Compte + 1: Exit For
    Next C
Next L
End Function

Syntaxe : =Compte(Plage;Chaine)

 

Pièces jointes

• NBCA1 (1).xlsm

  14.4 KB · Affichages: 1

Vote positif 0 Vote négatif

patty58

XLDnaute Occasionnel

• 18 Novembre 2023

• #7

Bonjour Sylvanu
En effet mea culpa, je n'ai pas percuté
Bonne soirée

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 18 Novembre 2023

• #8

Bonjour à tous,
La réponse de patty me va bien meme si elle est incomplète pour le CA1 en double par ligne mais je ne sais pas si c'est possible en formule.
Pour sylvanu, je ne souhaitais pas rajouter une colonne ni du vba dans mon fichier
D'ailleurs comment savoir par une formule si CA1 est endouble sur une ligne?
Bonne soirée

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 18 Novembre 2023

• #9

carlos à dit:

D'ailleurs comment savoir par une formule si CA1 est en double sur une ligne?

Cliquez pour agrandir...

Vous avez la réponse dans ma PJ #2 : =NB.SI(B1:F1;"CA1*")

 

Vote positif 0 Vote négatif

patty58

XLDnaute Occasionnel

• 18 Novembre 2023

• #10

Bonjour Carlos, bonjour sylvanu
J'abandonne n'étant pas pro des formules.
Comme dit sylvanu, soit macro, soit si tu n'en veux pas, la colonne supplémentaire que tu peux cacher si cela te gêne. Je ne vois personnellement pas d'autres solutions...
Bonne soirée à tout le monde

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 18 Novembre 2023

• #11

Merci, j'utiliserais peut etre celle de Sylvanu.
Merci à vous.

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 18 Novembre 2023

• #12

Alors avec un petit effort, en J8 :

VB:

=SOMME(SI(NB.SI(INDIRECT("A"&LIGNE(A1:F8)&":F"&LIGNE(A1:F8));"CA1*")>0;1;0))

A valider par Maj+Ctrl+Entrée ... ou non suivant votre version car formule matricielle.
Avec XL2019 essayez avec.

 

Pièces jointes

• NBCA1 (2).xlsx

  9.9 KB · Affichages: 1

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 18 Novembre 2023

• #13

Bonsoir carlos, sylvanu,

Ou encore avec DECALER, sans validation matricielle :

Code:

=SOMMEPROD(SIGNE(NB.SI(DECALER(A1:F1;LIGNE(1:8)-1;);"CA1*")))

A+

 

Pièces jointes

• NBCA1 (3).xlsx

  10.5 KB · Affichages: 1

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

Supporter XLD

• 19 Novembre 2023

• #14

Super je regarde ce matin votre proposition.
Bonne journée

 

Vote positif 0 Vote négatif