| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Delete all rows except
Hello ( Excel 2002)My worksheet has about 3900 rows. I need to delete all
rows that do not have the following numbers 15,16,18,21,23,40,106,108,110,114,(there is a total of 34 different numbers) These numbers are found in column A. also I do not want to delete row 1 that has the titles. I need a macro because I have over 100 files . Help and Thanks |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Delete all rows except
Hi Marilyn
See http://www.rondebruin.nl/delete.htm You can use this example from the site in the macro Replace If .Value = "ron" Then .EntireRow.Delete With If IsError(Application.Match(.Value, _ Array(15, 16, 18), 0)) Then .EntireRow.Delete -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Marilyn" wrote in message ... Hello ( Excel 2002)My worksheet has about 3900 rows. I need to delete all rows that do not have the following numbers 15,16,18,21,23,40,106,108,110,114,(there is a total of 34 different numbers) These numbers are found in column A. also I do not want to delete row 1 that has the titles. I need a macro because I have over 100 files . Help and Thanks |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Delete all rows except
Thank You Ron. EXCELLENT!
"Ron de Bruin" wrote: Hi Marilyn See http://www.rondebruin.nl/delete.htm You can use this example from the site in the macro Replace If .Value = "ron" Then .EntireRow.Delete With If IsError(Application.Match(.Value, _ Array(15, 16, 18), 0)) Then .EntireRow.Delete -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Marilyn" wrote in message ... Hello ( Excel 2002)My worksheet has about 3900 rows. I need to delete all rows that do not have the following numbers 15,16,18,21,23,40,106,108,110,114,(there is a total of 34 different numbers) These numbers are found in column A. also I do not want to delete row 1 that has the titles. I need a macro because I have over 100 files . Help and Thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How to Delete empty rows in excel in b/w rows with values | Excel Worksheet Functions | |||
| Cut filtered rows, paste into next empty row of new sheet, and delete cut rows | Excel Worksheet Functions | |||
| Delete rows | New Users to Excel | |||
| How to delete rows when List toolbar's "delete" isnt highlighted? | Excel Worksheet Functions | |||
| delete empty rows between rows with text | Excel Discussion (Misc queries) | |||
Linear Mode
