Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Rows
I would like to write code that would find text in column A and then select
all rows to the last row, and finally delete all the selected rows including the original row where the text was found. I am able to find the text, no problem, and the text is unique to the first column. I used ActiveCell.End(xlDown) to get to the last row. But, it doesn't select all the rows. I tried finding the text and then using: strBeginCell = Selection.Addres as the beginning address, then using the following to get the ending cell address: ActiveCell.End(xlDown).Select strEndCell = Selection.Address And, finally using the following to select all the rows, at which point I get a syntax error: Range(strBegCell:strEndCell).Select Thank you. -- DougW |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Delete Rows if any cell in Column H is blank but do not Delete Fir | Excel Programming | |||
Copy pasting Rows, but need to Delete any Shapes/Pictures that are within copied rows | Excel Programming | |||
Cut filtered rows, paste into next empty row of new sheet, and delete cut rows | Excel Worksheet Functions | |||
How to delete rows when List toolbar's "delete" isnt highlighted? | Excel Worksheet Functions | |||
Delete every 3rd row, then delete rows 2-7, move info f/every 2nd row up one to the end and delete the row below | Excel Programming |