Simple help with macro please
One way:
Public Sub DelBlank()
On Error Resume Next
Range("A1:A20").SpecialCells(xlCellTypeBlanks).Ent ireRow.Delete
On Error GoTo 0
End Sub
the On Error statement prevents a run-time error if there are no
blank cells.
In article ,
"Brian Tozer" wrote:
Can someone please give me a macro that will delete all rows in a worksheet
that do not include any data in column A up to a maximum of row 20?
Thanks
Brian Tozer
|