pas besoin de macro ...Bonjour,
J'exporte des données pour faire mes comptes.
Dans l'exportation il y a des . et des ,
Je recherche une macro qui pourrait me convertir ce texte en nombre.
Regarde la pièce jointe 1005566
Merci à tous
Nico
Sub BizarreBizarre()
With Selection
.TextToColumns Destination:=Selection(1), DataType:=xlDelimited, FieldInfo:=Array(1, 1), DecimalSeparator:="."
.TextToColumns Destination:=Selection(1), DataType:=xlDelimited, FieldInfo:=Array(1, 1), ThousandsSeparator:="."
.Replace ".", ","
End With
End Sub
Sub UneSeulePasseMaisBizarreToujours()
With Selection
.TextToColumns Destination:=Selection(1), ThousandsSeparator:=".": .Replace ".", ","
End With
End Sub
Sub Bizarrie_II()
Selection.Replace ".", ""
End Sub
Hélas non car dans l'import il y a du texte et du nombre...
Quand le nombre ets supérieur à 1000, il met un point.
le simple remplacer "." par "", fait que les chiffres à virgule font un x100.
55,25 devient 5525 par exemple