Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Deleting all rows after the last active cell
I need to download a file on a regular basis and this number of rows in the files varies each time it is downloaded. I am using a macro on column B to carry out the MID function on column A. Once the function has been carried out I then need to copy the formula down all of column B as I don't know what the last active cell will be from one download to the next. The result is that I have thousand of excess rows which I need to delete. Can anyone give me code that will delete all rows from the last active cell onwards. Thanks Shirley -- Shirley Munro ------------------------------------------------------------------------ Shirley Munro's Profile: http://www.excelforum.com/member.php...nfo&userid=836 View this thread: http://www.excelforum.com/showthread...hreadid=469489 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Deleting all rows after the last active cell
How about just applying the formula to the rows you want.
Dim LastRow as long with activesheet lastrow = .cells(.rows.count,"A").end(xlup).row .range("b1:B" & lastrow).formula = "=mid(yourformulahere)" end with Shirley Munro wrote: I need to download a file on a regular basis and this number of rows in the files varies each time it is downloaded. I am using a macro on column B to carry out the MID function on column A. Once the function has been carried out I then need to copy the formula down all of column B as I don't know what the last active cell will be from one download to the next. The result is that I have thousand of excess rows which I need to delete. Can anyone give me code that will delete all rows from the last active cell onwards. Thanks Shirley -- Shirley Munro ------------------------------------------------------------------------ Shirley Munro's Profile: http://www.excelforum.com/member.php...nfo&userid=836 View this thread: http://www.excelforum.com/showthread...hreadid=469489 -- Dave Peterson |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Deleting all rows after the last active cell
Hi Dave Many thanks for your help - your code worked perfectly. The reason wasn't just applying the formula to the cells I needed was that wanted it all to run from a macro and now it does. Shirle -- Shirley Munr ----------------------------------------------------------------------- Shirley Munro's Profile: http://www.excelforum.com/member.php...info&userid=83 View this thread: http://www.excelforum.com/showthread.php?threadid=46948 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Dynamically display in Active Cell value from 2 rows above it | Excel Discussion (Misc queries) | |||
Dynamically display in active cell the value x-rows above it? | Excel Discussion (Misc queries) | |||
How to Add Rows From Active Cell with in a XLL Code | Excel Worksheet Functions | |||
Active Cell plus number of Rows | Excel Programming | |||
Active Cell plus number of Rows | Excel Programming |