Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
macros
I want to copy excel information from same cells in different sheets and
paste unto the same sheet , how can I use macro or anything else to do this without repeating the process for the many sheets I have. thanks |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
macros
Hi,
This will copy A1 - A10 to H1 - H10 in every worksheet Sub Stantial() For x = 1 To Worksheets.Count Sheets(x).Range("A1:A10").Copy Destination:=Sheets(x).Range("H1") Next End Sub Mike "kilo" wrote: I want to copy excel information from same cells in different sheets and paste unto the same sheet , how can I use macro or anything else to do this without repeating the process for the many sheets I have. thanks |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
macros
Thanks mike,
but this i need to paste the information copied from different sheets unto one single sheet. lets say if i copy from sheet8, i need to paste unto sheet 1, copy sheet 9, paste on a different cell in sheet 1 etc. could you help. "Mike H" wrote: Hi, This will copy A1 - A10 to H1 - H10 in every worksheet Sub Stantial() For x = 1 To Worksheets.Count Sheets(x).Range("A1:A10").Copy Destination:=Sheets(x).Range("H1") Next End Sub Mike "kilo" wrote: I want to copy excel information from same cells in different sheets and paste unto the same sheet , how can I use macro or anything else to do this without repeating the process for the many sheets I have. thanks |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
macros
Hi,
This method of addressing worksheets uses the sheet(n) method where sheet(1) is the leftmost sheet. This macro now copies the range A1 - H1 for every sheet to the first worksheets. It copies the information into the first empty row. Sub Stantial() lastrow = Sheets(1).Cells(Cells.Rows.Count, "A").End(xlUp).Row For x = 2 To Worksheets.Count Sheets(x).Range("A1:H1").Copy Destination:=Sheets(1).Range("A" & lastrow + 1) lastrow = lastrow + 1 Next End Sub Mike "kilo" wrote: Thanks mike, but this i need to paste the information copied from different sheets unto one single sheet. lets say if i copy from sheet8, i need to paste unto sheet 1, copy sheet 9, paste on a different cell in sheet 1 etc. could you help. "Mike H" wrote: Hi, This will copy A1 - A10 to H1 - H10 in every worksheet Sub Stantial() For x = 1 To Worksheets.Count Sheets(x).Range("A1:A10").Copy Destination:=Sheets(x).Range("H1") Next End Sub Mike "kilo" wrote: I want to copy excel information from same cells in different sheets and paste unto the same sheet , how can I use macro or anything else to do this without repeating the process for the many sheets I have. thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macros: can you copy macros from one doc to another? | Excel Discussion (Misc queries) | |||
Excel 2007 macros - how to merge 5 macros together into one | Excel Discussion (Misc queries) | |||
Macros warning always shows up, even if all macros removed | Excel Discussion (Misc queries) | |||
Macros - copying macros from one computer to another | Excel Discussion (Misc queries) | |||
Training: More on how to use macros in Excel: Recording Macros | Excel Worksheet Functions |