Pour réaliser une macro qui supprime les espaces, on utilise la fonction VBA Trim et ses dérivés :
- Trim permet de supprimer les espaces superflus à gauche et à droite d’une chaine de caractères
- LTrim permet de supprimer les espaces en trop à gauche
- RTrim permet de supprimer les espaces en trop à droite
La fonction Trim
Les fonctions Trim suivent les syntaxes suivantes :
Trim(cellule)
LTrim(cellule)
RTrim(cellule)
Exemple de macro avec la fonction Trim
La macro
Sub macro()
Dim cellule As Range ‘Variable
For Each cellule In Range(« A1:A6 ») ‘Plage
ActiveCell.Offset(0, 0).FormulaR1C1 = _
Trim(cellule)ActiveCell.Offset(1, 0).Select
Next cellule
End Sub
Les données sources
| A | B | C | D | |
|---|---|---|---|---|
| 1 | Maître Corbeau, sur un arbre perché, | |||
| 2 | Tenait en son bec un fromage. | |||
| 3 | Maître Renard, par l’odeur alléché, | |||
| 4 | Lui tint à peu près ce langage : | |||
| 5 | « Hé ! bonjour, Monsieur du Corbeau. | |||
| 6 | Que vous êtes joli ! que vous me semblez beau ! |
Le résultat
| A | B | C | D | |
|---|---|---|---|---|
| 1 | Maître Corbeau, sur un arbre perché, | |||
| 2 | Tenait en son bec un fromage. | |||
| 3 | Maître Renard, par l’odeur alléché, | |||
| 4 | Lui tint à peu près ce langage : | |||
| 5 | « Hé ! bonjour, Monsieur du Corbeau. | |||
| 6 | Que vous êtes joli ! que vous me semblez beau ! |