![]() |
|
#3
|
|||
|
|||
|
Hey Bob. Someone shot me this VBA script. Works beautiful.
Sub DeleteBlankRows() Dim r As Long For r = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1 If Cells(r, 5) = "" Then Rows(r).Delete Next r End Sub |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
How to send several rows of data from one column to each recipient in one go
|
mikustykus | Mail Merge | 14 | 09-30-2013 08:32 AM |
Count rows and add blank rows accordingly
|
Hoochtheseal | Word VBA | 1 | 01-29-2013 09:23 PM |
Watermark deletes headers
|
ChrisDevrell | Word | 1 | 05-01-2012 07:23 AM |
merging rows and creating sub-rows
|
gib65 | Excel | 2 | 12-09-2011 02:09 PM |
Outlook deletes emails
|
dbienenf | Office | 1 | 02-06-2011 03:15 PM |