Hi,
I have data from html files .

It has lot of space between the rows ..I need to delete the extra rows in between the rows .

How can i delete ..
This table will have some empty data .


Example i have the data like this

Hdr 1 hdr2 hdr3...

space ......


data1 data12 data13...

space ...

data4 data42 data43 ..


These data will be null insome cases ..
How can i delete the rows .. which contains no data ..

i tried this code

For i = 2 To ActiveSheet.UsedRange.Rows.Count
If IsEmpty(Cells(i, 3)) Then
Cells(i, 3).EntireRow.Delete
End If
Next

This still shows the space


Any help will be apprieciated ..

Thanks in advance..