Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Rows above a certain point
Julie,
This worked in Excel97 Dim rng As Range Set rng = Columns(1).Find("Report") If Not rng Is Nothing Then Range(Rows(1), Rows(rng.Row - 1)).Delete Else MsgBox "Not found" End If -- sb "Julie" wrote in message ... Is there anyway to delete rows above a certain point? I have a document that I import and my data varies each time. I want to create a macro to find a certain word in my report and then delete all the rows above that row. Ex: If I have a row in my report (in column A) called "Report Analysis", I want all of the rows above that word to be deleted. Note: The word is never in the same row number. Sometimes it is Column A, Row 20 and sometimes it is Column A, Row 30. Thanks in advance for any help! Julie |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
delete bad data point in excel 2007 | New Users to Excel | |||
How to add rows, to point to new row | Excel Discussion (Misc queries) | |||
In excel, how can i delete 1 digit and the decimal point? | Excel Worksheet Functions | |||
How to delete rows when List toolbar's "delete" isnt highlighted? | Excel Worksheet Functions | |||
How do I delete data in a column from a certain point on? | Excel Worksheet Functions |