Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Member
 
Posts: 84
Default Find empty cell then insert range in active row

Need help please!

Below is my current code that I believe can be more efficiently executed. I have the times in Range ("F50:I50") that I would like inserted into the next blank row in the range (F9:I16). Thanks for your help.


Range("f9:f16").Find("").Activate

ActiveCell.Value = "8:00 AM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "12:00 PM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "1:00 PM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "5:00 PM"
  #2   Report Post  
Member
 
Posts: 84
Default

Quote:
Originally Posted by Keyrookie View Post
Need help please!

Below is my current code that I believe can be more efficiently executed. I have the times in Range ("F50:I50") that I would like inserted into the next blank row in the range (F9:I16). Thanks for your help.


Range("f9:f16").Find("").Activate

ActiveCell.Value = "8:00 AM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "12:00 PM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "1:00 PM": ActiveCell.Offset(0, 1).Activate

ActiveCell.Value = "5:00 PM"


Found a faster approach but still wanting to speed up the macro. Here's my current code:

Range("F9:F16").Find("").Activate
Range("F50:I50").Copy: ActiveCell.PasteSpecial Paste:=xlPasteValues
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
Insert selected cell value into next cell in range that is empty Guy[_2_] Excel Worksheet Functions 6 January 3rd 09 11:08 PM
How do i find last not empty cell in a range excelent Excel Worksheet Functions 9 December 31st 08 02:59 PM
find row number of next empty cell in range Albert Browne Excel Programming 2 June 14th 08 02:57 PM
Find first empty cell in range and paste formula?? Naji Excel Programming 11 February 8th 08 11:40 PM
find range name for active cell Len Excel Programming 2 November 22nd 05 03:37 PM


All times are GMT +1. The time now is 12:00 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"