Paste 10 or more worksheets data in a single worksheet
Closed
mahfuz19
Posts
4
Registration date
Sunday November 10, 2013
Status
Member
Last seen
February 16, 2014
-
Dec 28, 2013 at 12:01 PM
mahfuz19 Posts 4 Registration date Sunday November 10, 2013 Status Member Last seen February 16, 2014 - Dec 31, 2013 at 10:40 AM
mahfuz19 Posts 4 Registration date Sunday November 10, 2013 Status Member Last seen February 16, 2014 - Dec 31, 2013 at 10:40 AM
Related:
- Paste 10 or more worksheets data in a single worksheet
- Transfer data from one excel worksheet to another automatically - Guide
- How do you add a username or author to a worksheet - Guide
- Automatically run a macro when opening a worksheet - Guide
- Tmobile data check - Guide
- Which key is used to make multiple line in a single cell - Guide
2 responses
Honey85209
Posts
7
Registration date
Thursday December 26, 2013
Status
Member
Last seen
January 5, 2014
Dec 29, 2013 at 09:40 AM
Dec 29, 2013 at 09:40 AM
hi,
The below code pulls the data from the all the sheets and it will paste it different sheet called summary which you need to rename to one of the tab
Sub SummurizeSheets()
Dim ws As Worksheet
Application.ScreenUpdating = False
Sheets("Summary").Activate
Sheets("Summary").UsedRange.Clear
For Each ws In Worksheets
If ws.Name <> "Summary" Then
ws.UsedRange.Copy
ActiveSheet.Paste Range("A65536").End(xlUp).Offset(1, 0)
End If
Next ws
End Sub
The below code pulls the data from the all the sheets and it will paste it different sheet called summary which you need to rename to one of the tab
Sub SummurizeSheets()
Dim ws As Worksheet
Application.ScreenUpdating = False
Sheets("Summary").Activate
Sheets("Summary").UsedRange.Clear
For Each ws In Worksheets
If ws.Name <> "Summary" Then
ws.UsedRange.Copy
ActiveSheet.Paste Range("A65536").End(xlUp).Offset(1, 0)
End If
Next ws
End Sub
mahfuz19
Posts
4
Registration date
Sunday November 10, 2013
Status
Member
Last seen
February 16, 2014
Dec 31, 2013 at 10:40 AM
Dec 31, 2013 at 10:40 AM
Thanks a lot Honey85209. Is it possible in excel formula as i m not used to in VBA Macro.
Regards
Mahfuz
Regards
Mahfuz
