Supprimer des espaces sans se fier à ce que l'on voit

Bonjour,

Je travaille avec des japonais et j'ai une incompréhension avec leur fichier.

Dans le fichier ci-joint, on voit que A2 = C2 or, la formule B2 dit le contraire.

En C2, on voit qu'il y a des espaces après les chiffres.

Plus précisément, on voit 110100000000011 mais quand on sélectionne la cellule et qu'on copie les données ailleurs, on obtient : 11 01 00 0 0 00 000 1 1

J'ai essayé du SUBSTITUTE, du REMPLACER, du SUPPRESPACE... Impossible de faire en sorte que A2 = C2.

À l'aide !!!

Merci.

17espace.xlsx (8.40 Ko)

Bonjour

Juste whaaouuu j'avoue que c'est très très étrange ^^ Je vais investiguer tout ça

Okey j'ai compris, ce ne sont pas des espaces mais des tabulations !! On peux donc utiliser la fonction REPLACE

Test de ton coté ce code, pour ma part ça marche !

Sub test()

Dim str As String

str = Range("C2")
str = Replace(str, Chr(9), "")
str = Replace(str, " ", "")
Range("D2") = str

End Sub

Bonjour,

La même chose sans VBA (je n'ai pas testé, n'ayant pas ouvert le fichier) :

=SUBSTITUE(SUBSTITUE(C2;CAR(9);"");" ";"")

Okey j'ai compris, ce ne sont pas des espaces mais des tabulations !! On peux donc utiliser la fonction REPLACE

Test de ton coté ce code, pour ma part ça marche !

Sub test()

Dim str As String

str = Range("C2")
str = Replace(str, Chr(9), "")
str = Replace(str, " ", "")
Range("D2") = str

End Sub

Bonjour,

effectivement quand on copie la colonne dans un bloc note on voit plus facilement les tabulations.

On peut d'ailleurs les supprimer dans un bloc note avant de recopier de nouveau la colonne dans excel.

Méthode N°2

@Pedro22, ton code fonctionne, donc bcp plus simple que du VBA Well Done !

J'avais oublié de mettre le fichier sur mon précédent poste

39espace.xlsm (19.75 Ko)

Salut,

J'ai galéré mais j'ai trouvé une formule qui fonctionne :

=SUBSTITUE(C2;CAR(9);"")+0

Apparemment j'ai été trop lent :p

Ah ouais, bien vu

Par contre, faudrait pouvoir le faire sur une colonne entière.

Autre chose, VBA obligatoire ? J'ai des collègues qui ne sont pas chauds VBA

Merci en tout cas !

EDIT @Girodo

Je suis preneur du coup, merci !

@Pedro22 te propose ci-dessus une formule (sans VBA) tu n'auras qu'à l'étirée sur ta colonne

32espace.xlsm (20.59 Ko)

Malheureusement, ça ne marche pas à tous les coups (j'ai aussi des lettres dans le fichier original).

Nouveau cas ci-joint.

EDIT : j'ai rien dit ! MERCI

13espace.xlsx (10.08 Ko)

Salut,

Si tu as des lettres alors ça devrait fonctionner avec :

=SIERREUR(SUBSTITUE(C2;CAR(9);"")+0;SUBSTITUE(C2;CAR(9);""))

Bon courage,

Salut,

No problemo, la formule de Pedro22 fonctionne bien.

Rechercher des sujets similaires à "supprimer espaces fier que voit"