Problème de collage spécial avec "Blancs non compris"

[Okidor]

Bonjour à tous,


Je tente de copier une colonne (C1) sur une autre colonne (C2), mais sans que les cellules vides de C1 écrasent le contenu des cellules appartenant à C2. Pour cela, j'utilise le collage spécial en cochant l'option "Blancs non compris".
Sauf que les cellules de C1 que je pensais être vide (absence de caractère dedans) ne le sont pas, puisqu'elles écrasent le contenu des cellules de C2.
J'ai essayé de les "vider" en utilisant une macro trouvée sur un autre forum :

For Each ss In Selection
If IsNull(ss.Value) Then ss = Empty
Next ss

Mais ca n'a pas fonctionné ...

Si vous avez une suggestion, je suis preneur !


D'avance Merci !

 

[Cousinhub]

Re : Problème de collage spécial avec "Blancs non compris"

Bonjour,
pourrais-tu joindre un fichier exemple, avec juste 4 ou 5 cellules de la colonne copiée, mais comprenant une ou plusieurs cellules "à priori" vides?

Ton fichier provient-il d'une extraction?

Souvent, avec ce code, on arrive à se défaire des cellules "à priori" vides :

Sub Macro2()
For Each cel In Selection
    cel.Value = cel.Value
Next cel
End Sub

 

[Okidor]

Re : Problème de collage spécial avec "Blancs non compris"

Merci pour ta réponse, bhbh.

La macro que tu me proposes résout parfaitement mon problème ...




Pour répondre à tes questions, je joins un fichier exemple avec des cellules "a priori" vides ...
Mon fichier ne provenait pas d'une extraction.


Merci pour la réactivité de votre forum, je reviendrais !