View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
chris100[_37_] chris100[_37_] is offline
external usenet poster
 
Posts: 1
Default Help with Looping to solve 'procedure too large' problem


Hi all,

Anyone help with looping this please - i need to perform the same
action as this until the numbers in red are say, 100). Alternatively
until a line to be copied is blank.


lrw = Sheets("BREAKDOWN").Cells(Rows.Count, "A").End(xlUp).Offset(1,
0).Row

Sheets("BREAKDOWN").Cells(lrw, 1) = Sheets("invoice").Range("cg7")
Sheets("BREAKDOWN").Cells(lrw, 2) = Sheets("invoice").Range("ch7")
Sheets("BREAKDOWN").Cells(lrw, 3) = Sheets("invoice").Range("ci7")
Sheets("BREAKDOWN").Cells(lrw, 4) = Sheets("invoice").Range("cj7")

Thanks for all the help. Could someone also recommend any links to
good looping examples?


--
chris100
------------------------------------------------------------------------
chris100's Profile: http://www.excelforum.com/member.php...o&userid=25166
View this thread: http://www.excelforum.com/showthread...hreadid=478484