Thread
:
How do I create a macro to remove blank rows...
View Single Post
#
2
Posted to microsoft.public.excel.programming
Gary''s Student
external usenet poster
Posts: 11,058
How do I create a macro to remove blank rows...
Sub rowkiller()
n = Cells(Rows.Count, "A").End(xlUp).Row
For i = n To 1 Step -1
If Cells(i, 1).Value = "" Then
Rows(i).Delete
End If
Next
End Sub
--
Gary''s Student - gsnu200839
Reply With Quote
Gary''s Student
View Public Profile
Find all posts by Gary''s Student
How do I create a macro to remove blank rows...