Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy and paste to multiple cell
Do you mean only A19:AE19 or A1:AE19? And do you mean on the same
sheet? The following will do what you ask: Sub Test() Range("A19:A19").Copy Destination:=Range("A20") End Sub or Sub Test() Range("A1:A19").Copy Destination:=Range("A20") End Sub But I suspect this isn't going to be too helpful for you (it only ever copies A1:AE19 or A19:Ae19). Perhaps you could expand on exactly what you are doing? Richard JAXIE wrote: What I have is a range (A to AE 19) that I want to copy and paste below the frisr range. Is there a way to do this with a macro ?? It is for a printout for doing inventory in our warehouse and I am stuck on this so I am doing this manually for now. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
copy and paste to multiple cell
Jaxie
The following will copy the range A1:Ae19 down 599 times: Sub test() Range("A1:AE19").Copy Destination:=Range("a20:a" & 19 * 600) End Sub Make sure the sheet that you want this procedure run on is the active one when you run the macro (ie it is the one you are viewing in Excel). If you have any formulas in this range, I would switch to Manual Calculation before you run it (it will run faster then). Hope this helps! Richard JAXIE wrote: I want to copy A1:AE19, as this range is one sheet to print out. I need to print 600 sheets for our purpose. The reason for this is in the header i am using this BIN#&[Page]. I can set the page number to what ever I need to start at, this year it will be 2000 to 2599 to get 600 pages. They are printed on a dot matrix printer on a 2 sheet carbon. So the range to copy is A1:AE19 and paste below for 600 sheets or pages. Hope this will help. Thanks "RichardSchollar" wrote: Do you mean only A19:AE19 or A1:AE19? And do you mean on the same sheet? The following will do what you ask: Sub Test() Range("A19:A19").Copy Destination:=Range("A20") End Sub or Sub Test() Range("A1:A19").Copy Destination:=Range("A20") End Sub But I suspect this isn't going to be too helpful for you (it only ever copies A1:AE19 or A19:Ae19). Perhaps you could expand on exactly what you are doing? Richard JAXIE wrote: What I have is a range (A to AE 19) that I want to copy and paste below the frisr range. Is there a way to do this with a macro ?? It is for a printout for doing inventory in our warehouse and I am stuck on this so I am doing this manually for now. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
copy once paste multiple places | Excel Discussion (Misc queries) | |||
copy multiple worksheets of a workbook, and paste onto a Word document ( either create new doc file or paste onto an existing file.) I need this done by VBA, Excel Macro | Excel Programming | |||
copy and paste multiple selection | Excel Programming | |||
Copy & paste in multiple areas using VBA | Excel Discussion (Misc queries) | |||
Copy and Paste macro needs to paste to a changing cell reference | Excel Programming |