Aide sur une formule

B

bbanor

XLDnaute Occasionnel

• 14 Octobre 2008

• #2

Re : Aide sur une formule

Peut être un petit fichier exemple en attaché pour être plus claire !!!!

Merci

 

Pièces jointes

• TestCountI.xls

  29.5 KB · Affichages: 56
• TestCountI.xls

  29.5 KB · Affichages: 56
• TestCountI.xls

  29.5 KB · Affichages: 57

Vote positif 0 Vote négatif

Tibo

XLDnaute Barbatruc

• 14 Octobre 2008

• #3

Re : Aide sur une formule

Bonsoir,

Une solution (s'il peut y avoir d'autres lettres que le I) :

Code:

=SOMMEPROD(((NBCAR(A2:G2)-NBCAR(SUBSTITUE(A2:G2;"I";"")))*1))

Plus simple s'il n'y a que des I :

Code:

=SOMMEPROD(((NBCAR(A2:G2)*1)))

@+

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 14 Octobre 2008

• #4

Re : Aide sur une formule

Bonsoir bbanor,

Je n'ai pas trouvé autre chose qu'une fonction VBA. La formule =F(plage;t) compte le nombre d'occurences du caractère "t" dans la plage de cellules "plage" :

Code:

Function F(plage As Range, t$)
Dim Cel As Range, i As Integer
F = 0
For Each Cel In plage
For i = 1 To Len(Cel)
If Mid(Cel, i, 1) = t Then F = F + 1
Next
Next
End Function

A+

Edit : salut Tibo, pas terrible ici le VBA...

 

Dernière édition: 14 Octobre 2008

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 14 Octobre 2008

• #5

Re : Aide sur une formule

[QUOTE
Plus simple s'il n'y a que des I :

Code:

=SOMMEPROD(((NBCAR(A2:G2)*1)))

@+[/QUOTE]

Merci Tibo
Cette formule marche sans pb.

Merci pour ton aide

J'essaierai aussi la VB dès que j'aurai une minute de libre.

Merci à vous Deux

 

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 15 Octobre 2008

• #6

Re : Aide sur une formule

Code:

Function F(plage As Range, t$)
Dim Cel As Range, i As Integer
F = 0
For Each Cel In plage
For i = 1 To Len(Cel)
If Mid(Cel, i, 1) = t Then F = F + 1
Next
Next
End Function

Salut Job75 j'ai essayé dans ma feuille cette fonction VB dans un module mais pas de résultat. j'ai sûrement fait une erreur de manip.

Pourrais tu m'aider please

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 15 Octobre 2008

• #7

Re : Aide sur une formule

Bonjour bbanor, le forum,

J'ai mis la macro dans un module et la fonction en K2, fichier ci-joint.

A+

 

Pièces jointes

• TestCountI.xls

  26 KB · Affichages: 66
• TestCountI.xls

  26 KB · Affichages: 60
• TestCountI.xls

  26 KB · Affichages: 61

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 15 Octobre 2008

• #8

Re : Aide sur une formule

Super Job75

Merci pour ton aide. J'ai essayé sur un autre fichier ça marche très bien

Bravo

 

Vote positif 0 Vote négatif