Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Deleting Unique Rows
Hello, I have the following code to delete blank rows within a worksheet.
'Deletes blank lines, for advance filterring [a1:a50000].SpecialCells(xlCellTypeBlanks).EntireRow.Delete Question: Is there a method to delete certain rows, if a particular cell within a row meets certain criteria? For instance, I'd like to reference range a1:a50000, and delete each row within this range, if "Sub Total" is the value in any cell within column A. Is this possible and if so, how? Any and All Help Is Appreciated - Thank You |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Deleting Unique Rows
You could do a loop like this...
application.screenupdating=false dim cell as range for each cell in range("a1:a50000") if cell.text="Sub Total" then cell.entirerow.delete next cell Of course faster ways can be used. "MWS" wrote: Hello, I have the following code to delete blank rows within a worksheet. 'Deletes blank lines, for advance filterring [a1:a50000].SpecialCells(xlCellTypeBlanks).EntireRow.Delete Question: Is there a method to delete certain rows, if a particular cell within a row meets certain criteria? For instance, I'd like to reference range a1:a50000, and delete each row within this range, if "Sub Total" is the value in any cell within column A. Is this possible and if so, how? Any and All Help Is Appreciated - Thank You |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Deleting Unique Values | Excel Discussion (Misc queries) | |||
Deleting Unique Rows | Excel Discussion (Misc queries) | |||
Help!! I have problem deleting 2500 rows of filtered rows!!!! | Excel Discussion (Misc queries) | |||
Deleting Duplicates, All records unique | Excel Discussion (Misc queries) | |||
Duplicates - deleting to get just unique ones | New Users to Excel |