Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 additionner des données sous texte

  • Initiateur de la discussion Initiateur de la discussion jad73
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jad73

XLDnaute Occasionnel
bonjour le forum
Comment additionner des chiffres, lettres qui sont dans un format texte
je joint le fichier avec quelques explications
merci
 

Pièces jointes

Bonsoir Jad,
J'espère que vous meilleur en musique qu'en calcul. 😂
Ligne 2 51, en fait c'est 49. En ligne 8 96 en fait c'est 92.

En PJ un essai avec une fonction perso :
VB:
Function SumLet(N$)
    Dim R%, V$, G$, i%: SumLet = 0: T = Split(N, " ")
    For i = 0 To UBound(T)
        G = Left(T(i), 1)
        If IsNumeric(G) Then SumLet = SumLet + Val(G)
        If G = "D" Or G = "A" Or G = "0" Then SumLet = SumLet + 10
    Next i
End Function

Syntaxe : =SumLet(A2)
 

Pièces jointes

Dernière édition:
Bonjour sylvanu, le forum
Merci pour ta réponse, effectivement il vaut mieux que je compte sur excel que sur mes doigts
(je n'est pas vérifié mon envoi)
une autre question, quelle formule employer pour compter le nombre de courses
Pour hier course de trot c'est parfait
Aujourd'hui c'est une course de plat et le résultat n'est pas correct.
Que faut-il modifier dans la macro
Merci
 

Pièces jointes

Bonsoir Jad,
J'ai créé une nouvelle fonction perso avec :
Code:
Function NbCourses(N$)
    Dim i%: T = Split(N, " "): NbCourses = 1 + UBound(T)
    For i = 0 To UBound(T)
        If Left(T(i), 1) = "(" Then NbCourses = NbCourses - 1
    Next i
End Function
La syntaxe est : =NbCourses(A2)
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
14
Affichages
528
Réponses
37
Affichages
949
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…