Multiple sheet data in one sheet in excel

[Closed]
Report
-
Posts
2809
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
September 23, 2021
-
Hello,



Want to copy data from multiple sheet from multiple columns in one workbook

can you please help me with that macro as well


Pranjali

2 replies

Posts
2809
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
September 23, 2021
484
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
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
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
Posts
2809
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
September 23, 2021
484
Hi Pranjali,

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