a function that deletes all rows with no value in a certain column?
Hi,
Am Thu, 6 Jun 2013 21:55:30 +0200 schrieb Claus Busch:
filter column H for empty cells and delete the visible rows.
if you want to do it automatically, then try VBA:
Sub DeleteRows()
Dim LRow As Long
LRow = Cells(Rows.Count, "H").End(xlUp).Row
Range("A1:H" & LRow).AutoFilter Field:=8, Criteria1:="="
Range("A2:H" & LRow).EntireRow.Delete
ActiveSheet.AutoFilterMode = False
End Sub
Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2
|