Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default 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   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default 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   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default 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
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Dynamically display in Active Cell value from 2 rows above it Jocko_MacDuff116 Excel Discussion (Misc queries) 4 May 12th 07 04:08 AM
Dynamically display in active cell the value x-rows above it? Jocko_MacDuff116 Excel Discussion (Misc queries) 0 May 12th 07 01:24 AM
How to Add Rows From Active Cell with in a XLL Code Sheraz Excel Worksheet Functions 0 August 8th 06 01:17 PM
Active Cell plus number of Rows L. Howard Kittle[_2_] Excel Programming 1 July 14th 03 09:09 PM
Active Cell plus number of Rows Don Guillett[_4_] Excel Programming 0 July 14th 03 08:53 PM


All times are GMT +1. The time now is 02:20 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"