lege cel, regel verwijderen dynamisch bestand

[1965Peter]

Hallo,

Ik wil als er in kolom A een lege cel staat, dat de hele regel wordt verwijderd in een dynamisch bestand.
"Columns("a").SpecialCells(4).EntireRow.Delete" werkt hiermee niet, omdat excel de "lege" cellen niet als leeg ziet?

Weet iemand de oplossing?

 

[snb]

Kijk eerst eens in je VBA Handboek.
Test vervolgens het effekt van

columns("a").select

Nu kun je zelf het antwoord op je vraag geven.

Alternatief:

Sub M_snb()
  UsedRange.Sort Cells(1), 2
End Sub

NB. in Excel kun je geen rijen verwijderen

Kijk maar:

Sub M_snb()
  msgbox rows.count
End Sub

geeft altijd 2^20 als resultaat, hoeveel rijen je ook 'verwijdert'.

 

[1965Peter]

oke, dus het aantal rijen blijven altijd hetzelfde. Nu wil ik de rijen die in mijn beleving leeg zijn ertussen uit.
Dat zal dan usedRange.Sort Cells(1), 2 deze ertussen uit halen.
alleen deze zegt fout 424 object vereist.

 

[HSV]

Bv.

Sub hsv()
 With Columns("a")
   .Replace "", "empty"
   .Replace "empty", ""
   .SpecialCells(4).EntireRow.Delete
 End With
End Sub

 

[1965Peter]

Yess Hsv, doet wat ie moet doen.
Thanks wederom.
Ik ga 'm sluiten