Fonction qui ne renvoie que la partie numérique d'une chaîne de caractères

[Magic_Doctor]

Bonsoir à tous,

Existe-t-il dans Excel une fonction qui ne renvoie que la partie numérique d'une chaîne de caractères ?
Par ex. :

f(1,33 bidule) ---> 1,33
f(255 bidules) --> 255

 

[kjin]

Re : Fonction qui ne renvoie que la partie numérique d'une chaîne de caractères

Bonsoir,

Existe-t-il dans Excel une fonction qui ne renvoie que la partie numérique d'une chaîne de caractères ?

Pas à ma connaissance mais tu peux la créer
Avec ton exemple

Function CH(cel As Range)
c = Replace(cel, ",", ".")
CH = Val(c)
End Function

En A1 --> 1,33 bidule
En B1 --> =CH(A1) te donnera 1,33
A+
kjin

 

[jeanpierre]

Re : Fonction qui ne renvoie que la partie numérique d'une chaîne de caractères

Bonjour Magic Doctor, kjin,

Sinon par formule : =GAUCHE(A1;CHERCHE(" ";A1)-1)*1

Avec tes données en colonne A, par exemple.

Bonne soirée.

Jean-Pierre

 

[bqtr]

Re : Fonction qui ne renvoie que la partie numérique d'une chaîne de caractères

Bonsoir,

Un autre exemple par fonction perso basé sur ton exemple (une seule série de chiffre à extraire) :

Function ExtChif(Cell As Range)
Dim k As Integer, Deb As Integer, Fin As Integer
For k = 1 To Len(Cell)
 If IsNumeric(Mid(Cell, k, 1)) Then Deb = k: Exit For
Next
For k = Len(Cell) To 1 Step -1
 If IsNumeric(Mid(Cell, k, 1)) Then Fin = k: Exit For
Next
ExtChif = CDbl(Mid(Cell, Deb, (Fin - Deb) + 1))
End Function

En A1 par exemple : f(1,33 bidule)
En C1 : =ExtChif(A1), le résultat sera 1,33

La fonction est à mettre dans un module de code standard.

A+