View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
puiuluipui puiuluipui is offline
external usenet poster
 
Posts: 468
Default macro to delete rows if cell blank in column

It's working.
Thanks!

"Gary''s Student" wrote:

Sub rowkiller()
Set r = Range("A3:A200")
Set rr = r.SpecialCells(xlCellTypeBlanks)
rr.EntireRow.Delete
End Sub

--
Gary''s Student - gsnu200907