Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 193
Default Need macro to go to next blank row, copy formulas into next row

Hi - really need a macro that allows users to go to the next blank row
(column B) and copy formulas into next row - where they enter new data.
Without a macro, I can use CTRL+END...
Any advice would be greatly appreciated, thanks in advance!
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 772
Default Need macro to go to next blank row, copy formulas into next row

This will get you the row number of the last cell in column B with data
lastCell = Sheets("sheet1").Cells(Rows.Count, "B").End(xlUp).Row
lastcell + 1 of course would get you the first blank
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"Pete" wrote:

Hi - really need a macro that allows users to go to the next blank row
(column B) and copy formulas into next row - where they enter new data.
Without a macro, I can use CTRL+END...
Any advice would be greatly appreciated, thanks in advance!

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,942
Default Need macro to go to next blank row, copy formulas into next row

hi
sub copyformula()
Range("B1").End(xlDown).Copy
Range("B1").End(xlDown).Offset(1, 0).PasteSpecial xlPasteAll
End Sub

regards
FSt1

"Pete" wrote:

Hi - really need a macro that allows users to go to the next blank row
(column B) and copy formulas into next row - where they enter new data.
Without a macro, I can use CTRL+END...
Any advice would be greatly appreciated, thanks in advance!

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 193
Default Need macro to go to next blank row, copy formulas into next ro

Cannot get this macro to work right - it copies cell Bx, then waits for you
to hit enter to paste?

I need to copy all hte formulas in last row into the next row, columns B to
AH.

"FSt1" wrote:

hi
sub copyformula()
Range("B1").End(xlDown).Copy
Range("B1").End(xlDown).Offset(1, 0).PasteSpecial xlPasteAll
End Sub

regards
FSt1

"Pete" wrote:

Hi - really need a macro that allows users to go to the next blank row
(column B) and copy formulas into next row - where they enter new data.
Without a macro, I can use CTRL+END...
Any advice would be greatly appreciated, thanks in advance!

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
Macro: Insert Blank Row with formulas uses absolute position probl steveb Excel Discussion (Misc queries) 1 June 18th 09 08:08 PM
Macro - How to not copy blank criteria? NPell Excel Worksheet Functions 1 September 6th 08 07:53 PM
Need macro to check if cell is not blank & previous cell is blank, copy information from row above & paste JenIT Excel Programming 4 April 12th 07 08:56 PM
Macro to insert copy and insert formulas only to next blank row bob Excel Programming 0 June 30th 06 12:02 PM
Macro to delete row if row blank but cells do have formulas in the Cathy Excel Programming 2 April 16th 06 01:07 AM


All times are GMT +1. The time now is 12:10 PM.

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"