Transformation d'une cellule en VBA

bocman -  
ccm81 Messages postés 11033 Statut Membre -
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 11033 Statut Membre 2 434
 
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