Macro pour supprimer un espace insécable

Résolu
Gaston Lagaffe 94 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   -  
Gaston Lagaffe 94 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai besoin d'un petit coup de main pour supprimer un espace insécable situé à la fin d'une date dans chaque cellule de la même colonne.
J'ai bien réussi à le supprimer avec la fonction =CNUM(SUPPRESPACE(B2)), mais cela m'oblige à recréer une colonne dans une autre feuille.
J'essaye de créer une macro pour supprimer cet espace directement dans la colonne concernée, mais malgré divers essais je n'arrive pas à un résultat satisfaisant.
Quelqu'un a-t-il une idée pour me sortir de la panade ?
En vous remerciant par avance.

Je joint un petit extrait de mon fichier original contenant les fameux espaces insécables (en colonne B).

https://www.cjoint.com/?BFluOkekMky
A voir également:

2 réponses

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
bonjour,

En fait tu n'as pas d'espace insécable dans tes données, c'est assez bizarre, car ta date parait correcte mais n'est pas traitée comme date malgré le format.

Cette macro devrait te réparer cette colonne B :

Public Sub vers_date()
Dim elm As Range
For Each elm In UsedRange.Columns("B").Cells
    If IsDate(elm.Value) Then elm.Value = CDate(elm.Value)
Next elm
End Sub
0
Gaston Lagaffe 94 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour et merci d'avoir pris en compte ma demande. J'ai essayé la macro que tu me propose, mais je me retrouve avec une "erreur d'exécution '424' " après l'exécution de la ligne 3.
0
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

Si tu as mis la macro dans un module il faut préciser la feuille concernée, par exemple :

For Each elm In Activesheet.UsedRange.Columns("B").Cells
0
Gaston Lagaffe 94 Messages postés 6 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Ça y est ça fonctionne impeccable. J'ai eu beaucoup de mal à l'adapter à ma macro principale, mais, enfin, ça marche. Un grand merci à toi.
Cdt
0