Verwijderen nullen

[AAJ]

Hoi,

Ik heb een vraagje over het verwijderen van nullen.
In mn tabel heb ik staan:
A B <- Kolom
A 0 0
B 0 0
C 0 0
D 0 0
0 E 0
0 F 0
0 G 0
0 H 0
0 I 0
J
K
L
M
etc...

Hoe kan ik dit oplossen dat de nullen weg zijn, maar de letters naast elkaar komen te staan in de kolommen?
Dus:
A E
B F
C G
D H
I
etc..

Filteren en daarna verwijderen lukt helaas niet.

Alvast bedankt voor uw hulp!

 

[Cobbe]

Selecteer het bereik met de gegevens en voer deze macro uit:

Sub cobbe()
For Each nul In Selection
 If nul = 0 Then
   nul.Delete Shift:=xlUp
 End If
Next
End Sub

 

[abevleeming]

Let daarbij op dat die actie (macro) niet ongedaan gemaakt kan worden dus sla m een keer extra op.

Ik begrijp alleen niet wat je bedoelt met dat de letters "naast elkaar komen te staan" zoals in je voorbeeldje. Tot de "I" kan ik het redelijk volgen namelijk...