josros60.xlsm | ||||||
---|---|---|---|---|---|---|
A | B | C | D | |||
1 | Hdr1 | Hdr2 | Hdr3 | Hdr4 | ||
2 | x | x | x | x | ||
3 | x | x | x | |||
4 | x | x | x | |||
5 | x | x | x | x | ||
6 | x | x | x | |||
7 | x | x | x | |||
8 | ||||||
9 | x | x | x | x | ||
Sheet1 |
delete blank rows from a range
Now I'm a little confused as to whether your data is in a formal Excel table (ListObject) or just a normal range that you are referring to as a "table".my table has
Sub Del_Rows()
Range(Range("A" & Rows.Count).End(xlUp).Offset(1), Range("H" & Rows.Count).End(xlUp)).EntireRow.Delete
End Sub