je désirerais écrire une macro qui supprime les espaces entre les valeurs numériques.
Cependant, je redoute que ça s'affiche sous une forme différente.
Par exemple:
Sub test_II()
Dim nochr32 As String
Dim strg As String
strg = "238095054100101 13091938 2 107266976"
nochr32 = Replace(strg, Chr(32), "")
With Range("A1")
.NumberFormat = "@"
.Value = nochr32
End With
End Sub
A tester
Code:
Sub test()
Dim nochr32 As String
Dim strg As String
strg = "238095054100101 13091938 2 107266976"
nochr32 = Replace(strg, Chr(32), "")
Range("A1").Value = "'" & nochr32
End Sub
Génial! ton code marche. mais mon problème n'est pas encore résolu.
j'ai une centaine de données à modifier et je ne voudrais pas à chaque fois changer le code
strg = "238095054100101 13091938 2 107266976"
aurais tu une alternative pour ce code avec une boucle par exemple?