Discussion :

[nono63]

Bonjour,

J'ai créé une macro qui réalise un traitement de données issues d'un .CSV
Ce fichier comprend facilement des milliers de lignes.
Une étape du traitement est la suppression des espaces avant et arrière des cellules, ceci est facile avec la fonction TRIM mais le temps
de traitement devient excessivement long, trop long pour être acceptable.
Existe-t-il un moyen de supprimer ces espaces de façon plus rapide qu'une boucle if, each pour traiter chaque cellule ?

Merci

[mfoxy]

Bonjour,

Je suppose, vu que tu n'a pas publier ton code, que tu utilise une boucle sur chaque cellule et reatribue la valeur passe par la fonction trim

Peut-être essayer de "nettoyer" l entièreté du range, par exemple pour le Range(A2:A100) .

À modifier bien entendu le nom de la feuille et le range concerné.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Sub Test()
 
Dim rng As Range
Set rng = Sheets("Sheet1").Range("A2:A100") 
rng.Value = Application.Trim(rng)
 
End Sub

[nono63]

Super merci pour cette solution !!

[mfoxy]

Re,

De rien Nono,

Bon Week-end, prenez soins de vous et de vos proches.