Multiple sheet data in one sheet in excel
Closed
pranjali
-
Feb 22, 2012 at 10:24 PM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Feb 27, 2012 at 10:28 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Feb 27, 2012 at 10:28 AM
Related:
- Multiple sheet data in one sheet in excel
- Little alchemy cheat sheet - Guide
- Mark sheet in excel - Guide
- How to screenshot excel sheet - Guide
- How to open excel sheet in notepad++ - Guide
- Google sheet right to left - Guide
2 responses
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
552
Feb 23, 2012 at 08:45 AM
Feb 23, 2012 at 08:45 AM
Hi Pranjali,
What do you want to copy (which rows or columns or sheets or ranges?)?
Where do you want to put it?
Please provide more details in order for us to help you.
Best regards,
Trowa
What do you want to copy (which rows or columns or sheets or ranges?)?
Where do you want to put it?
Please provide more details in order for us to help you.
Best regards,
Trowa
I want to copy multiple sheet data in sheet no 1
for example.
Sheet 2,3,4...n
want to copy
column,B,c,d,E...n
in sheet number 1
B,c,D,....Etc
would you please help me with the macro
Thanks and Regards,
Pranjali
for example.
Sheet 2,3,4...n
want to copy
column,B,c,d,E...n
in sheet number 1
B,c,D,....Etc
would you please help me with the macro
Thanks and Regards,
Pranjali
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
552
Feb 27, 2012 at 10:28 AM
Feb 27, 2012 at 10:28 AM
Hi Pranjali,
Still not clear about the specifics.
Please give your comments on the following code:
Best Regards,
Trowa
Still not clear about the specifics.
Please give your comments on the following code:
Sub test()
Dim lRow, lRow2 As Integer
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name = "Sheet1" Then GoTo Nxt
lRow = Sheets(ws.Name).Range("B" & Rows.Count).End(xlUp).Row
Sheets(ws.Name).Range("B1:E" & lRow).Copy
Sheets("Sheet1").Select
lRow2 = Sheets("Sheet1").Range("B" & Rows.Count).End(xlUp).Offset(1, 0).Row
Sheets("Sheet1").Range("B" & lRow2).PasteSpecial
Nxt:
Next ws
Application.CutCopyMode = False
End Sub
Best Regards,
Trowa
Feb 23, 2012 at 10:07 PM
for example.
Sheet 2,3,4...n
want to copy
column,B,c,d,E...n
in sheet number 1
B,c,D,....Etc
would you please help me with the macro
Thanks and Regards,
Pranjali