recopier une colonne sans les blancs

[ericb]

Bonjour à vous, je vous expose le problème :
J'ai une colonne contenant des comptes-client du type :

c000001
c000002

c000003

c000004
c000005
....

j'aimerai recopier cette colonne ailleurs mais en tassant les cellules pour enlever les blancs.
Pouvez-vous m'aider?

 

[C@thy]

Bonjour ericb,

voici un exemple de code :

j = 0
For i = 1 To Range("A65535").End(xlUp).Row
If Range("A" & i).Value <> vide Then
j = j + 1
Range("B" & j).Value = Range("A" & i).Value
End If
Next i

 

[ericb]

merci c'est nickel!!

 

[chris]

Bonjour,
Hors VBA tu peux filtrer en filtre auto sur non vide puis faire un copier coller.
Chris