| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Copy data from one sheet to another
Hi,
I want to run a macro which will take data from cells A1~G1 on sheet 1 and paste them onto the bottom of a list on sheet 2. Sheet 1 will be like a input page and sheet 2 will be a log of all data entered. I hope someone can help. Thanks, |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Copy data from one sheet to another
with sheets("Sheet2")
LastRow = .Range("A" & rows.count).end(xlup).Row NewRow = LastRow + 1 Sheets("Sheet1").Range("A1:G1").copy destination:=.Range("A" & NewRow) end with "Big Simon" wrote: Hi, I want to run a macro which will take data from cells A1~G1 on sheet 1 and paste them onto the bottom of a list on sheet 2. Sheet 1 will be like a input page and sheet 2 will be a log of all data entered. I hope someone can help. Thanks, |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Copy data from one sheet to another
Worked brilliantly! Thanks for your help.
"Joel" wrote: with sheets("Sheet2") LastRow = .Range("A" & rows.count).end(xlup).Row NewRow = LastRow + 1 Sheets("Sheet1").Range("A1:G1").copy destination:=.Range("A" & NewRow) end with "Big Simon" wrote: Hi, I want to run a macro which will take data from cells A1~G1 on sheet 1 and paste them onto the bottom of a list on sheet 2. Sheet 1 will be like a input page and sheet 2 will be a log of all data entered. I hope someone can help. Thanks, |
|
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Copy data from one sheet to another
Joe,
This is very close to what I'm looking for. The only difference is that the rows in "sheet1" increase on a weekly basis and I need to copy only the new rows onto the bottom of "sheet2". I tried making the following alteration, but it didn't work: Sheets("Sheet1").Range("A" & botrowsht2 : "G" & botrowsht1).copy destination:=.Range("A" & botrowsht2) I get a compile error on "("A" & botrowsht2 : "G" & botrowsht1" Any help will be greatly appreciated. "Joel" wrote: with sheets("Sheet2") LastRow = .Range("A" & rows.count).end(xlup).Row NewRow = LastRow + 1 Sheets("Sheet1").Range("A1:G1").copy destination:=.Range("A" & NewRow) end with "Big Simon" wrote: Hi, I want to run a macro which will take data from cells A1~G1 on sheet 1 and paste them onto the bottom of a list on sheet 2. Sheet 1 will be like a input page and sheet 2 will be a log of all data entered. I hope someone can help. Thanks, |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| copy data of two cells from Sheet 2 into one cell in Sheet 1 | Excel Worksheet Functions | |||
| Copy/filter data in a sheet from another sheet | Excel Discussion (Misc queries) | |||
| How can i copy data from a tabbed working sheet to a summary sheet | Excel Discussion (Misc queries) | |||
| how to copy a cell with formula from sheet 1 (data is all vertical) into sheet 2 | Excel Worksheet Functions | |||
| Copy sheet 1 data to sheet 2 cells. | Excel Worksheet Functions | |||
Linear Mode
