Transformation d'une cellule en VBA

bocman -  
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

je voudrai savoir si il est possible en vba de garder la valeur numérique d'une cellule qui contient une valeur plus du texte exemple la cellule A1 contient 5,5ml je voudrais que dans la cellule B1 il n y ait que 5.5

1 réponse

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
bonjour

quelque chose comme ça?

Public Sub extraitnombre()
Dim c As Range
Dim v
For Each c In Selection
  v = c.Value
  v = Replace(v, ",", ".")
  v = Val(v)
  c.Value = v
Next c
End Sub

bonne suite
0