Double formule

Résolu
Utilisateur anonyme -  
tontong Messages postés 2572 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaite passer de « Total: 200.000.000 £ » à « 200000000 », comment dois-je procéder ?
Avec plusieurs formules SUBSTITUE j'y arrive, mais comment faire pour n'avoir qu'une seule formule ?

Merci,




A voir également:

2 réponses

Réponse 1 / 2
tontong Messages postés 2572 Date d'inscription   Statut Membre Dernière intervention   1 062
 
Bonjour,
On peut imbriquer des Substitue:
=SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;".";"");" £";"";1);"Total: ";"";1)*1
Nota: "*1" transforme le texte en nombre
1
Utilisateur anonyme
 
C'est parfait, ça fonctionne !
Merci Tontong !!
0
tontong Messages postés 2572 Date d'inscription   Statut Membre Dernière intervention   1 062
 
Euh,
La fonction de michel_m fonctionne aussi et présente un champ d'application moins spécifique.
0
Réponse 2 / 2
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
bonjour,
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)
0

Discussions similaires

comment ecrire un double cote " "
helmii -
[Dal] -

3 réponses