Double formule
Résolu/Fermé
Utilisateur anonyme
-
30 mars 2013 à 13:58
tontong Messages postés 2549 Date d'inscription mercredi 3 février 2010 Statut Membre Dernière intervention 23 avril 2024 - 30 mars 2013 à 14:46
tontong Messages postés 2549 Date d'inscription mercredi 3 février 2010 Statut Membre Dernière intervention 23 avril 2024 - 30 mars 2013 à 14:46
A voir également:
- Double formule
- Double ecran - Guide
- Whatsapp double sim - Guide
- Formule excel - Guide
- Formule si et - Guide
- Formule moyenne excel - Guide
2 réponses
tontong
Messages postés
2549
Date d'inscription
mercredi 3 février 2010
Statut
Membre
Dernière intervention
23 avril 2024
1 054
Modifié par tontong le 30/03/2013 à 14:18
Modifié par tontong le 30/03/2013 à 14:18
Bonjour,
On peut imbriquer des Substitue:
=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;".";"");" £";"";1);"Total: ";"";1)*1
Nota: "*1" transforme le texte en nombre
On peut imbriquer des Substitue:
=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;".";"");" £";"";1);"Total: ";"";1)*1
Nota: "*1" transforme le texte en nombre
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
30 mars 2013 à 14:09
30 mars 2013 à 14:09
bonjour,
Avec une fonction personnalisée
si total; 2...ect est dans B2
=extrait_chiffres(B2)
Avec une fonction personnalisée
Function extrait_chiffres(ByRef texto As String) As Long
Dim reg As Object
Dim extraction As Object
Set reg = CreateObject("vbscript.regexp")
reg.Global = True
reg.Pattern = "(\d?\d?\d)"
Set extraction = reg.Execute(texto)
For Each digit In extraction
extrait_chiffres = extrait_chiffres & (digit.Value)
Next digit
Set extraction = Nothing
Set reg = Nothing
End Function
si total; 2...ect est dans B2
=extrait_chiffres(B2)
30 mars 2013 à 14:22
Merci Tontong !!
30 mars 2013 à 14:46
La fonction de michel_m fonctionne aussi et présente un champ d'application moins spécifique.