Compter le nombre d un caractère à la suite dans une cellule en partant droite [Résolu]

Signaler
Messages postés
62
Date d'inscription
mardi 8 septembre 2015
Statut
Membre
Dernière intervention
28 août 2020
-
Messages postés
62
Date d'inscription
mardi 8 septembre 2015
Statut
Membre
Dernière intervention
28 août 2020
-
Bonjour à tous,

J'ai un problème qui ne semble pas très compliqué mais que je n'arrive pas à résoudre seul...
J'aimerais savoir comment faire pour compter le nombre d'un caractère consécutif dans une cellule en partant de la droite.
illustration:
en A1 : azzeazeaezeeeeaa : résultat attendu : 2 (car 2 lettre "a" à la suite en partant de la droite)
en A2 : azeezeazeeezaeza : résultat attendu : 1 (car seulement une lettre a en partant de la droite)
en A3 : aezeazezezaeeeee : résultat attendu : 5 (car 5 lettre "e" à la suite en partant de la droite)

Merci par avance de votre aide.

3 réponses

Messages postés
12705
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
26 septembre 2020
2 026
Bonjour

Avec une fonction personnalisée :
https://mon-partage.fr/f/obQAXwL5/

Cdlmnt
Via
Messages postés
62
Date d'inscription
mardi 8 septembre 2015
Statut
Membre
Dernière intervention
28 août 2020
1
Bonjour,

Merci pour cette réponse rapide, cela fonctionne parfaitement.

Cdlt,
roro
Messages postés
23504
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
26 septembre 2020
6 364
Bonjour,

compter de droite à gauche par formule c'est plutôt chaud...
Avec une fonction personnalisée à mettre dans un module standard :
Function compteCarFin(ch As String) As Long
    Dim i As Long, car As String
    car = Right(ch, 1)
    For i = Len(ch) To 1 Step -1
        If Mid(ch, i, 1) = car Then compteCarFin = compteCarFin + 1 Else Exit For
    Next i
End Function

https://www.cjoint.com/c/IKCrlgGpd47
eric
Messages postés
62
Date d'inscription
mardi 8 septembre 2015
Statut
Membre
Dernière intervention
28 août 2020
1
Bonsoir eriiic,

et merci ! Ça marche aussi...
Messages postés
8186
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
20 septembre 2020
1 472
Bonjour,

Avec une formule (en B1) :
=NBCAR(A1)-TROUVE(CAR(1);SUBSTITUE(A1;DROITE(SUBSTITUE(A1;DROITE(A1);""))&DROITE(A1);CAR(1);(NBCAR(A1)-NBCAR(SUBSTITUE(A1;DROITE(SUBSTITUE(A1;DROITE(A1);""))&DROITE(A1);"")))/2)) 

Messages postés
62
Date d'inscription
mardi 8 septembre 2015
Statut
Membre
Dernière intervention
28 août 2020
1
Bonsoir Patrice,

Merci pour cette réponse sans vba qui fonctionne très bien aussi!

Cdlt,
roro