XL 2016 Supprimer espace dans cellule

[KTM]

Bonjour chers tous
Je voudrais une macro pour supprimer les espaces dans les cellules de ma colonne A.
Merci

 

[Wayki]

Salut
J'ai vu Ce fil l'autre jour,
Ta solution n'est elle pas là dedans ?

 

[mapomme]

Bonjour à tous,

• sélectionner la colonne A
• taper Ctrl+H
• rechercher espace (tapez un espace)
• remplacer par rien (laisser vide ce champ)
• cliquer sur le bouton "Remplacer tout"

En macro:

Sub SupprEspace()
   Sheets("Feuil1").Columns(1).Replace What:=" ", Replacement:="", LookAt:=xlPart
End Sub

 

[KTM]

Bonjour à tous,

• sélectionner la colonne A
• taper Ctrl+H
• rechercher espace (tapez un espace)
• remplacer par rien (laisser vide ce champ)
• cliquer sur le bouton "Remplacer tout"

En macro:

Sub SupprEspace()
   Sheets("Feuil1").Columns(1).Replace What:=" ", Replacement:="", LookAt:=xlPart
End Sub

Regarde la pièce jointe 1112479

Merci à tous
avec ceci j'ai pu résoudre
[A2:A12000] = Application.Trim([A2:A12000])