Deleting rows with specific criteria

BobBridges · #6 11-21-2013, 05:09 PM

I'd never used that particular value of SpecialCells; sounds like just the ticket.

Joflow, the number of incoming worksheets may change every time; but since the program is doing the importing, surely it can count them as it happens?

But if the headers are all the same, this should work too:

Code:

Set so = TheSubjectWorksheet
jr = 1
val1 = so.Cells(jr, 1).Value 'column header for col A
Do
  jr = jr + 1
  Loop While so.Cells(jr, 1).Value = val1
Range(so.Cells(2, 1), so.Cells(jr - 1, 1).EntireRow.Delete

(I haven't testing this code; something like it should be right, though.)

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Mail Merge to create specific number of table rows	flackend	Mail Merge	4	12-01-2023 02:49 PM
Grouping table rows to prevent individual rows from breaking across pages	dennist77	Word	1	10-29-2013 11:39 PM
Print attachment when it arrive in specific folder with specific subject	visha_1984	Outlook	1	01-30-2013 10:42 AM
Count rows and add blank rows accordingly	Hoochtheseal	Word VBA	1	01-29-2013 09:23 PM
Adding columns in specific rows only	mhays	Excel	5	01-17-2012 09:13 AM