Skip to main content

How To Combine All Worksheets Into One Worksheet In Excel || Combine Multiple Sheets into One Sheet


In this tutorial, let us learn how to combine multiple sheets into a single workbook using a simple VBA code.

This code assumes that all the worksheets have the same column headings and in the same order.
This code will copy all the rows into one worksheet called Master.

Steps: 1. Copy the code as mentioned

Sub CopyFromWorksheets() Dim wrk As Workbook 'Workbook object - Always good to work with object variables Dim sht As Worksheet 'Object for handling worksheets in loop Dim trg As Worksheet 'Master Worksheet Dim rng As Range 'Range object Dim colCount As Integer 'Column count in tables in the worksheets Set wrk = ActiveWorkbook 'Working in active workbook For Each sht In wrk.Worksheets If sht.Name = "Master" Then MsgBox "There is a worksheet called as 'Master'." & vbCrLf & _ "Please remove or rename this worksheet since 'Master' would be" & _ "the name of the result worksheet of this process.", vbOKOnly + vbExclamation, "Error" Exit Sub End If Next sht 'We don't want screen updating Application.ScreenUpdating = False 'Add new worksheet as the last worksheet Set trg = wrk.Worksheets.Add(After:=wrk.Worksheets(wrk.Worksheets.Count)) 'Rename the new worksheet trg.Name = "Master" 'Get column headers from the first worksheet 'Column count first Set sht = wrk.Worksheets(1) colCount = sht.Cells(1, 255).End(xlToLeft).Column 'Now retrieve headers, no copy&paste needed With trg.Cells(1, 1).Resize(1, colCount) .Value = sht.Cells(1, 1).Resize(1, colCount).Value 'Set font as bold .Font.Bold = True End With 'We can start loop For Each sht In wrk.Worksheets 'If worksheet in loop is the last one, stop execution (it is Master worksheet) If sht.Index = wrk.Worksheets.Count Then Exit For End If 'Data range in worksheet - starts from second row as first rows are the header rows in all worksheets Set rng = sht.Range(sht.Cells(2, 1), sht.Cells(65536, 1).End(xlUp).Resize(, colCount)) 'Put data into the Master worksheet trg.Cells(65536, 1).End(xlUp).Offset(1).Resize(rng.Rows.Count, rng.Columns.Count).Value = rng.Value Next sht 'Fit the columns in Master worksheet trg.Columns.AutoFit 'Screen updating should be activated Application.ScreenUpdating = True  End Sub

2. Open the workbook that contains worksheets you want to combine.

3. Press Alt+F11 or right click on any sheet tab and select view code, to open the Visual Basic Editor (VBE).

4. From the menu, choose Insert-Module and then paste the code into the code window at the right side.

5. Save the file and close the Visual Basic Editor.

6. Now, go back to the Excel workbook and go to view tab, under macors, select view macros and runt the CopyFromWorksheets macro.

7. You will observe that a new sheet called Master has been created which has collated all the data from the three sheets.

So friends, in this way one can combine or collate data from multiple worksheets/ tabs into a single worksheet.

For Personalized detail learning, write to dptutorials15@gmail.com If you found this video valuable, give it a like. If you know someone who needs to see it, share it. Leave a comment below with your thoughts. Add it to a playlist if you want to watch it later.

***************************************************************
Read my full article on this: http://ift.tt/2kB14dh
***************************************************************
Subscribe for more Awesome Tutorials: goo.gl/4T8ePc
***************************************************************
Support The Channel via shopping: http://ift.tt/2jH38PR
**************************************************************

You Can Connect With Me at
G+ : http://ift.tt/2kAOpa6
Twitter : https://twitter.com/dptutorials15
Facebook : http://ift.tt/2kfRnDi
Blogspot : http://ift.tt/2kB14dh

Comments

Popular posts from this blog

How To Merge Two Separate Schedules Into One Master Schedule In Primavera

In this tutorial, let us learn how to Merge two separate schedules into One Master schedule in Primavera P6. In this example, I am considering two separate projects which are these two, One is master schedule and one is the subproject. First, let us open the subproject and export this schedule as a .XER file onto Desktop. and now let us start the exact process of merging two separate schedules. 1. As a first step, We need to open the project schedule into which we want to insert the other project as a sub-project. So, let us open the Master schedule here. 2. Go to Import, select XER format, Click Next 3. Select Project and click Next 4. Now select the Subproject .xer file from the Desktop and click Next 5. Under Import action, select the option as “Update Existing Project” and under import to section, select the Master schedule which is already open. Click Next and Finally Click on Finish. 6. Please note and make sure that your WBS and activity IDs should not confl...

Primavera P6 Export To Excel And Color WBS Levels Automatically || How To Color WBS Levels

In this tutorial, let us learn how to Color WBS levels after Primavera P6 Export To Excel. After exporting activity table from Primavera P6 to Excel, it’s very hard to tell which activity belong to which WBS. So in this tutorial, let us see how to color WBS levels automatically so we can have a report like in Primavera P6. This is my sample schedule in primavera, 1. I press Ctrl+A to select entire data and copy the data and then go to Excel sheet and paste it. 2. Add a column left to Activity Id i.e column A and name it as WBS level to show the WBS level for each activity. 3. enter the formula in Cell A2 as = =((FIND(TRIM(B2),B2))-1)/2 4. Hit enter and then apply the same formula to all the cells in column A to see WBS level for each activity. 5. See now, you can view the WBS level for each activity this way easily in Excel after exporting the Primavera P6 Schedule. And Now let us color the WBS levels. 1. Select the entire Data range. 2. Go to Conditional F...

Primavera P6 Tutorial : Chapter 2.7 : User Defined Fields

Apart from the in-built fields available in primavera, you can create User-defined fields which enable you to customize fields and values and add them to the project database. For example, you can use them to track additional activity data such as ordered dates, delivery dates, revised budgets, purchase order / work order numbers, vendor names, etc. In this chapter, let us learn how to create User defined fields, how to work with them and how to work with indicators type of User defined fields. How to Create UDFs? For each custom user defined field you create, you can specify any of the following data formats for that field: Text, Start Date, Finish Date, Cost, Integer, Number, Text, and Indicator. To Define: Go to the Menu bar, Choose Enterprise, select  User Defined Fields . Select the subject area to which you want to add a new field, then click  Add . Double-click in the Title column and type a name for the User Defined Field. Double-click in the Da...