Copy all worksheets in excel - Word и Excel - помощь в работе с программами

Move or copy worksheets or worksheet data

You can move or copy a worksheet in the same workbook to organize your workbook exactly how you want.

You can use the Move or Copy Sheet command to move or copy entire worksheets (also known as sheets), to other locations in the same or a different workbook. You can use the Cut and Copy commands to move or copy a portion of the data to other worksheets or workbooks.

Move a worksheet within a workbook

Select the worksheet tab, and drag it to where you want it.

Caution: When you move a sheet to another workbook, check any formulas or charts that refer to data on the sheet because moving the sheet might cause errors or produce unintended results in your data. Similarly, if you move a sheet that is referred to by 3-D references, the calculation might include or leave out data on the sheet.

Copy a worksheet in the same workbook

Press CTRL and drag the worksheet tab to the tab location you want.

Right click on the worksheet tab and select Move or Copy.
Select the Create a copy checkbox.
Under Before sheet, select where you want to place the copy.
Select OK.

When you need to reorganize your data, you can easily change the order of sheets in a workbook, or move or copy a sheet to another workbook. But be aware that calculations or charts that are based on sheet data may become inaccurate if you move the sheet.

Move a sheet

Drag the sheet tab to the location that you want along the row of sheet tabs.

Copy a sheet

Hold down OPTION.
Drag the sheet tab to the location that you want the copied sheet to appear along the row of sheet tabs.

Important: Release the mouse button before you release the OPTION key.

Move a sheet to another workbook

Caution: When you move a sheet to another workbook, check any formulas or charts that refer to data on the sheet because moving the sheet might cause errors or produce unintended results in your data. Similarly, if you move a sheet that is referred to by 3-D references, the calculation might include or leave out data on the sheet.

Open the workbook that you want to move the sheet to.
On the Window menu, click the workbook that contains the sheet that you want to move.

Click the sheet that you want to copy to the other workbook.
On the Edit menu, click Sheet > Move or Copy Sheet.
On the To book menu, click the workbook that you want to move the sheet to.

Tip: To create a new workbook that contains the moved sheet, click new book.
In the Before sheet box, click the sheet that you want to insert the moved sheet before, or click move to end.
Click OK.

Copy a sheet to another workbook

Open the workbook that you want to copy the sheet to.
On the Window menu, click the workbook that contains the sheet that you want to copy.

Click the sheet that you want to copy.
On the Edit menu, click Sheet > Move or Copy Sheet.
On the To book menu, click the workbook that you want to copy the sheet to.

Tip: To create a new workbook that contains the moved sheet, click new book.
In the Before sheet box, click the sheet that you want to insert the copied sheet before, or click move to end.
Select the Create a copy check box.
Click OK.

Change the color of a sheet tab

Coloring the sheet tabs can help you keep track of your information in a large workbook.

Hold down CONTROL and click the sheet tab.
Click Tab Color, and then click the color that you want to use.

In Excel for the web, you can duplicate (or copy) worksheets within the current workbook. Simply right-click the tab name at the bottom of the sheet and click Duplicate.

Note: You may receive an error when you are trying to duplicate a worksheet that contains a chart, picture, or shape. If you get an error, you can duplicate the sheet manually.

If you have elements in your worksheet that interfere with duplicating it, you can still create a copy of the worksheet manually by copying all the data and pasting it into a new sheet. Here’s how:

Select all the data in the worksheet.

Keyboard shortcut: Press CTRL+Spacebar, on the keyboard, and then press Shift+Spacebar.
Copy all the data on the sheet by pressing CTRL+C.
Click the plus sign to add a new blank worksheet.
Click the first cell in the new sheet and press CTRL+V to paste the data.

Note: You will lose any conditional formatting applied to the cells when you paste them into the new worksheet.

In Excel for the web, the option to move or copy a sheet isn’t available when you right-click a sheet tab, as it is in the Excel desktop application. In Excel for the web, you can achieve the same result by copying all of the data in the worksheet and pasting it into a blank worksheet in the other workbook.

Follow these steps to move or copy a worksheet to another workbook in Excel for the web:

Select all the data in the worksheet.

Keyboard shortcut: Press CTRL+Spacebar and then press Shift+Spacebar.
Copy all the data on the sheet by pressing CTRL+C.
Open the workbook in which you want to paste the data, then click the + in the status bar to add a new blank worksheet.
Click the first cell in the new worksheet, then press CTRL+V to paste the data into that worksheet.

Note: You will lose any conditional formatting applied to the cells when you paste them into the other workbook.

Need more help?

You can always ask an expert in the Excel Tech Community or get support in the Answers community.

Need more help?

Источник

Содержание

Excel VBA Worksheets.Copy Method to copy worksheet
Excel VBA Worksheets.Copy Method to copy worksheet
Syntax of Excel VBA Worksheets.Copy Method
Example 1 – Copy worksheet in the same workbook
Example 2 – Copy worksheet to another workbook
Example 3 – Copy worksheets to a new workbook
Example 4 – Copy worksheet from another closed workbook
Question
4 ways to merge Excel sheets into one
Ultimate Suite for Excel
Copy sheets in each workbook to one worksheet
Copy selected worksheets from several workbooks to one file
Choose ranges to copy
Be sure your new books are always up to date
Combine data from selected sheets into one
Merge data from the identically named worksheets into one
Paste values only
Preserve formulas when merging data
Combine multiple Excel files into one workbook
to merge multiple Excel files into one
What is Copy Sheets and what do I need it for?
Doesn’t Microsoft Excel do the same without any add-ins?
How does Copy Sheets work?
Can I choose range for copying in the selected sheets?
My data has formulas, will they be copied as well?
I’ve got links in my copied ranges, can I preserve them?
How can I separate the copied data?
What our customers think
I’ve been using the Ablebits product for several years
AbleBits automated my entire Excel life
Ablebits Ultimate Suite turns Excel into what it should have always been
Inexpensive with TONS of value!
Can’t live without it
Ablebits occupies a unique place for Excel users
Absolutely worth every penny.
Just one great product and a great company!
A wonderful feeling to be amazed by a product
The Ablebits Excel add-in is an absolute must have
The software is the real deal
Great product — even better service
It’s a lifesaver!
I would be lost without it
Ablebits has saved me countless hours!
Always well within 24 hours
A life and time saving tool with great customer service!
Can’t go without it
It is a game changer!
Abelbits is a very useful program
I highly recommend the Ablebits Ultimate Suite
We discovered a gold mine!
Would recommend it to anyone who works with Excel
Save hours of your life
Ablebits makes magic
I have found the Ablebits app and website to be extremely useful
Extremely useful add-in with extensive functionality
Ablebits Ultimate Suite for Excel is invaluable if you work with spreadsheets
The best add-in for anyone
Exceptional product and service
Excellent product and support!
It is a productivity multiplier!
If that’s not good service, I don’t know what is
My Excel life changed a lot… for the better!
Well worth the price of admission
Ultimate Suite is a treasure chest of useful tools
The best tools. Exactly what I needed
AbleBits has been a huge time saver
That one program has given me years of convenience
Ablebits is a dream come true for any Excel user
This add-in is really valuable for a very reasonable cost
We couldn’t imagine being without this tool!
Just want to say that I LOVE your Ultimate Suite Excel add-on
In the first 30 minutes of using Ablebits, I have already found at least ten different tools that will save me hours each month
Your Ablebits are truly amazing
Ablebits has allowed us to reduce timescale from hour to around 5-10 minutes
This software is by far the best I have ever purchased
This product changed my working and investing experience
Ablebits offers amazing services!
Fantastic program
KUDOS to you guys for solving a problem that our IT department doesn’t understand
AbleBits suite has really helped me when I was in a crunch!
I love the program, and I can’t imagine using Excel without it!
It is like having an expert at my shoulder helping me…

Excel VBA Worksheets.Copy Method to copy worksheet

This tutorial explains how to copy worksheets using Worksheets.Copy Method in Excel VBA, and demonstrate how to copy worksheet to another workbook.

You may also want to read:

Excel VBA Worksheets.Copy Method to copy worksheet

Excel VBA Worksheets.Copy Method is to copy worksheet in a workbook. You can copy worksheets from one workbook to another workbook, and specify to insert after or before specific worksheet.

Syntax of Excel VBA Worksheets.Copy Method

Name	Description
Before	Optional. The sheet before which the copied sheet will be placed. You cannot specify Before if you specify After.
After	Optional. The sheet after which the copied sheet will be placed. You cannot specify After if you specify Before.

If you don’t specify either Before or After , Microsoft Excel creates a new workbook that contains the copied sheet.

Example 1 – Copy worksheet in the same workbook

The below example copies “Sheet2” to the end of the worksheets, and rename it as “new worksheet”.

The below example copies “Sheet2” and move to the first worksheet

Example 2 – Copy worksheet to another workbook

The below example copies worksheet “wbA ws1” to another workbook “workbook b” after worksheet “wbB ws1”

Example 3 – Copy worksheets to a new workbook

You may also read my another example to copy each worksheet to new workbook.

Example 4 – Copy worksheet from another closed workbook

This example was originally asked in Microsoft Community.

Question

Need help with VBA Code.

I’ve searched and tried a few codes but have been having trouble finding something that works.

What I want to do:

1) I’m in an open and active workbook

2) I want to insert and new sheet at the end of all the sheets in the open workbook

3) The sheet I want to insert is from a closed workbook with several worksheets.

Info, Please use in example code, appreciated.

Источник

4 ways to merge Excel sheets into one

Copy data from multiple worksheets at once

One tool, four different ways to merge multiple Excel sheets into one. You just specify how you want to combine spreadsheets, and let the Copy Sheets add-in do the rest. What used to be a daunting task for many Excel users is now a simple few-clicks operation. No more copying and pasting, no more manual re-entry of data, no more errors.

Ultimate Suite for Excel

This tool is part of Ablebits Ultimate Suite that includes 70+ professional tools and 300+ solutions for daily tasks.

Copy sheets in each workbook to one worksheet

This option will turn your workbooks to sheets and collect all the resulting worksheets in one workbook.

Copy selected worksheets from several workbooks to one file

Collect all the needed sheets from different Excel files to one new workbook in a couple of clicks.

Choose ranges to copy

Whichever merging option you use, you can choose not to copy the whole sheet, but only particular ranges.

Be sure your new books are always up to date

Tick off Create links to source data if you want the result tables to be updated automatically when the source data is changed.

Combine data from selected sheets into one

Create one table with data from multiple sheets. Place the copied ranges one under another or side by side.

Merge data from the identically named worksheets into one

Merge several Excel files into one by combining worksheets with the same name into one sheet in a new workbook.

Paste values only

Select this option if you don’t want to copy formulas, but rather replace formulas with their calculated values.

Preserve formulas when merging data

If your copied ranges contain formulas and you need to preserve them in your new workbook, just tick off Paste all.

Combine multiple Excel files into one workbook

Choose one of 4 ways

to merge multiple Excel files into one

Frequently asked questions

What is Copy Sheets and what do I need it for?

Copy sheets is an add-in for Microsoft Excel that simplifies and expedites the process of combining data from different worksheets and workbooks.

The tool offers 4 ways to copy data:

Copy sheets in each workbook to one sheet and have all the new tables in one file.
Merge values from the identically named sheets in different workbooks to one sheet.
Create a new workbook with only selected worksheets from different books.
Collect data from the chosen worksheets to one table.

Doesn’t Microsoft Excel do the same without any add-ins?

There is a build-in command Move or Copy Sheet, which is sufficient if you merge sheets from one workbook. In case you have many workbooks and need to copy sheets from each of them, working with Move or Copy command will be rather time-consuming. With Copy Sheets you can copy tables from different worksheets and workbooks simultaneously, so the more books and sheets you have, the more working hours will be saved.

Excel Consolidate feature can be helpful to pull together data from several worksheets, but it works for numeric values only and you have to choose the function: sum, count, average, etc. If you need to merge data by just copying values, the consolidation option won’t help.

Of course, you can always use copy-pasting, but again, it is great for a little number of sheets and books, but could be rather wearisome when you have dozens of them.

How does Copy Sheets work?

On Step 1 you choose one of the four copying options:

Sheets in each workbook to one sheet
Sheets with the same name to one sheet
Selected sheets to one workbook
Data from the selected sheets to one sheet

On Step 2 you select the worksheets, workbooks and ranges to copy. You can add any Excel files to the list.

On Step 3 you choose how to paste data (paste formulas or values only, create links to source data), how to place the values (to columns or to rows), and how to copy data (preserve formatting, separate the copied ranges by a blank column, copy table with their headers).

You click Copy button and in a couple of seconds get the new workbook with all the copied ranges.

Find a more detailed description here.

Can I choose range for copying in the selected sheets?

Yes, from each sheet you can select a certain range for copying.

My data has formulas, will they be copied as well?

All your formulas will be preserved if you tick off Paste all option.

I’ve got links in my copied ranges, can I preserve them?

Yes, tick off Create links to source data to save your links.

How can I separate the copied data?

The copied ranges can be separated by blank columns or rows.

Over 150,000 happy users!

What our customers think

I’ve been using the Ablebits product for several years

I’ve been using the Ablebits Excel product for several years. It is a lifesaver since my life revolves around data and spreadsheets. With the variety of tools and ease of use, there are no tasks I haven’t been able to accomplish. Also, their customer service has always been very responsive and provide great answers, plus additional tips, or information.

AbleBits automated my entire Excel life

AbleBits Ultimate has an endless amount of features that I’m still figuring out after 6 months of use. I got tired of adding in formulas myself, multi step processes to try and merge tables, and the dreaded formatting issues I always had to deal with. Everything in AbleBits completes the automations with wizards and easy to use features. Thank you for everything and will continue to recommend this add on to everyone!

Andrew Binno , 20-Feb-23

Ablebits Ultimate Suite turns Excel into what it should have always been

Ablebits Ultimate Suite turns Excel into what it should have always been. I’ve had this product for about 5 years and won’t use Excel without it. I frequently need to take data from multiple sources and coalesce it into large import files. The Merge Table function is a gamechanger for these tasks. The Substring functions are also an exceptional piece of kit for streamlining data. There’s a limit to Excel’s data management capabilities, but the Ultimate Suite tools take it to a whole new level.

Inexpensive with TONS of value!

I have been an ablebits user for many years, and while sometimes people tell me you can do everything it does natively in excel — ablebits makes it EASY. I can consolodate and combine things using a natural language, I can see the results of something before I do it. It is an inexpensive tool that is incredibly valuable!

Debbie Foster , 29-Jan-23

Can’t live without it

I love the program, and I can’t imagine using Excel without it! We do a lot of database management in excel and Ultimate Suite saves us endless time. I use it a lot for merging columns, trimming spaces, merging spreadsheets, converting casing. The program pays for itself. Thank you for all your efforts and support.

Julie Bradley , 17-Jan-23

Ablebits occupies a unique place for Excel users

Ablebits occupies a unique place for Excel users as there is no comparable product out there. I have found the duplicate remover and merge duplicates modules particularly useful. It is very user-friendly and the support response has been rapid and helpful when I have contacted them. There is so much information on their website explaining how to achieve outcomes in Excel. Highly recommended!

Barry Beiles , 16-Jan-23

Absolutely worth every penny.

I use Ablebits Ultimate Suite in Excel everyday and the amount of time saved is amazing. Things that used to take 10 or 15 minutes now can be done in under a minute with this add-in. HIGHLY recommended! Customer service is quick and the staff is very knowledgeable and courteous.

Just one great product and a great company!

I have been using Ablebits since 2016 and it has been a most useful tool. And if that isn’t enough, their support should be the model for all customer support throughout the industry. Over the years I have had problems or questions and they have resolved all quickly and politely without making you feel belittled. Just one great product and a great company!

Don Scarpetti , 23-Dec-22

A wonderful feeling to be amazed by a product

I paid for the personal edition out of my salary for my own use. It was not purchased by my organization, and I truly think that this is money well spent. I have not had one moment of regret – just the opposite. Each time that I use AbleBits I experience pleasure that I have spent my money wisely and am getting more value for my money than I could have thought possible. What a wonderful feeling to be amazed by a product each time that I use it even after daily using it for over a year.

Deon van Niekerk , 17-Dec-22

The Ablebits Excel add-in is an absolute must have

If you find yourself working with spreadsheets even a couple times a day then you need to stop what you are doing and buy this add in! The Ablebits Excel add in is an absolute must have. I have been using it for years now and can’t even start to quantify how many hours, days, weeks, this has saved me. Adding to the awesome product is an awesome support team. Anytime I’ve ever had a problem or question they are prompt to reply providing nothing but useful information.

Dave Tarantelli , 16-Dec-22

The software is the real deal

I can’t tell you how many times I was scratching my head on something I needed to do in Excel and would suffer through a cumbersome way to do it, then I found Ablebits. More often than not, they have an elegant and easy solution for what I need to do. They have saved me countless hours and headaches. Their customer support is top notch too — very quick and HELPFUL. These folks are the real deal. The software is the real deal.

Christopher Rotolo , 15-Dec-22

Great product — even better service

The Ablebits Excel addin is a real time saver. If you are doing anything complex with data sets in Excel and want to do things like de-dupe, check and cross-reference, this is a game changer. Well worth the money. Above that, the service is really excellent. Send an email and you get a reply pretty much within the hour. Very impressed and can’t recommend enough.

Alan Perestrello , 28-Nov-22

It’s a lifesaver!

I have been using the ultimate suite for a few years and its a lifesaver!! I use it all the time to merge sheets and it saves me so much time! The support is also excellent. They are in a different time zone than I am (I am EST) but I always hear back in less than 24 hours. The price is reasonable and the product is good. I highly reccomend it!

Lauri Pantos , 28-Nov-22

I would be lost without it

I use Ablebits add on for excel several times per day and would be lost without it. For us it is especially useful for highlighting duplicates, removing duplicates, comparing tables, comparing sheets, deleting blank cells. It does much more than that, but these are the most popular uses here. It is well worth installing. Thanks!

Marc Lajoie , 28-Nov-22

Ablebits has saved me countless hours!

Ablebits has saved me countless hours! Every time I confront a repetitive task in Excel, I look to my Ablebits tool bar for a solution. I almost always find that the geniuses at Ablebits have developed a seamlessly integrated Excel solution. I’m still discovering powerful tools in this awesome collection of widgets.

PJ Kuyper, President, Platino Educa USA , 25-Nov-22

Always well within 24 hours

Besides the fact that this is impressive software that just works as you’d expect it to work (no overpromising and underdelivering), what’s even more impressive is the support that has Ablebits has given me over the years. I’ve very seldom had to call on support (usually trivial admin matters) but when I have, their responses have been comprehensive and always well within 24 hours. Well done Ablebits!

Leon Cronjé , 21-Nov-22

A life and time saving tool with great customer service!

A life and time saving tool with great customer service! I have used Ablebits for quite a few years and have been truly blessed by it. I take it with me with every new computer refresh I go through, and customer service is always able to provide me with any assistance that I need, hassle free. A product could be good, but when they have great customer service, they are deserving of a five star.

Paul Gittens , 11-Nov-22

Can’t go without it

I have been using AbleBits since probably 2008. First with their free version and then I purchased their paid version a few years ago. I just upgraded again. The program makes it so much easier to trim spaces and perform other tasks in Excel. I’d say I probably use their Excel add-in at least weekly if not daily. I recommend them for your Excel needs.

Alisha Benish , 7-Nov-22

It is a game changer!

I refuse to use Excel without Ablebits Ultimate Suite! It is a game changer! Compared to similar tools in the market, Ablebits is more user friendly and easier to understand than the others. And if you need help, their service support team is top notch and insanely fast to respond. You don’t need to be an Excel geek to use this product, but you will feel like one if you do!

Eric F Carr , 5-Nov-22

Abelbits is a very useful program

Abelbits is a very useful program. I use it constantly for the state function,Pivot table, transposing key columns, compare, consolidating spreadsheets, and duplicate remover. Customer support is very friendly and responds quickly especially when needing to do a new installation of a PC or upgrading. I highly recommend this product.

J Amsterdam , 26-Oct-22

I highly recommend the Ablebits Ultimate Suite

I’m a business coach and number crunching is not something I do a lot. Therefore there must be a lot more value in Ablebits suite than I will ever use. I find that the tools I wish were in Excel are all in the Suite and the level of support by the Ablebits team has been very quick, thorough and complete. I highly recommend the Ablebits Ultimate Suite.

Adam Pressman , 25-Oct-22

We discovered a gold mine!

When we discovered Ablebits 10 years ago, we discovered a gold mine! It provides a simple, straightforward way to work with multiple spreadsheets and excel files without having to figure out formulas. When something happens in our system and we «lose» Ablebits, my staff nearly panics until we can get it back up and running. We consider this an essential tool in performing many, many tasks in our jobs.

Rebecca D. Becker , 25-Oct-22

Would recommend it to anyone who works with Excel

We have been using the Ultimate Suite for a year and really appreciate the time it has saved us in getting our lists ready for our updates. I could not believe how fast AbleBits got back to us. They are very fast to help you with a problem and showing you how to take care of it. They are very knowledgeable with their product. I would recommend them to anyone who works with Excel a lot.

Save hours of your life

This product very literally saves me HOURS in time compiling or updating information from several Excel sheets or files into one using just one matching column, and cleaning into a usable endproduct. There are so many features that simplify otherwise timeconsuming and tedious tasks that it makes working without the Add-In seem impossible. Highly recommended!

Pennelope (Penney) Blakely Kunkle , 18-Oct-22

Ablebits makes magic

Ablebits is the «magic» that I use each week to help me accomplish nearly all of the tasks for which I am assigned. In a few simple clicks of a trackpad, I can create spreadsheets that help us review our impact and identify ways to continue to improve. The process is so easy and customer support has been critical; helping me make the most of this incredible tool!

Tracey Miller , 11-Oct-22

I have found the Ablebits app and website to be extremely useful

My work requires that I write financial reports exceeding 200 pages based on analyses done in Excel. I have found the Ablebits app and website to be extremely useful. Some specific tools I have found useful are the «find broken links,» select by color,» visualize, «formula translator» (beta version), «spell number,» and, best of all, the most reliable workbook manager I’ve ever used.

James F Joyner III , 25-Sep-22

Extremely useful add-in with extensive functionality

I purchased and installed Ablebits for Excel. I have found it to be extremely useful in supplementing the capabilities of Excel – the functionality is very extensive. More importantly, I have found the support from Ablebits to be invaluable – patient and thorough. I definitely recommend Ablebits if you want to push the limits of your use of Excel.

Doug Walters , 20-Sep-22

Ablebits Ultimate Suite for Excel is invaluable if you work with spreadsheets

Ablebits Ultimate Suite for Excel is well worth the money. This add on has saved me countless hours of work with just a couple of the features. I have to take client lists which are often not in the format I need and make them fit into the format we use. This is invaluable for merging spreadsheets with duplicate values, as well as merging multiple cells into useable data. You will not regret this purchase.

The best add-in for anyone

The Ablebits Ultimate Suite for Excel is without question the best add-in for anyone using spread sheets! Great tech support, no glitches, works fantastically well — and it really is useful. Lots of features that should be built-in to the platform and aren’t. I’ve used it for years with terrific results. Thanks!

Jeff Garris , 19-Sep-22

Exceptional product and service

Exceptional Product and Service: I have used Ablebits for several years, solving incredibly difficult problems in Excel, problems well beyond my coding and formula development skills, and each time, Ablebits provided an easy-to-use solution. And, when I needed help, response time was practically instantaneous, not an AI chatbot, but a real person who solves real problems.

Michael Toney , 24-Aug-22

Excellent product and support!

Being a user of the «Ultimate Suite» since 2016 and processing 100’000s of datasets, I am utmost convinced of the product. And what is also excellent: is the support. Every question asked was answered very quickly and competently. You provided a free upgrade unasked — stunning! Thank you, Ablebits team, for your excellent product and support!

Daniel Klaus , 17-Aug-22

It is a productivity multiplier!

Since first installing Ablebits Ultimate Personal over 18 months ago, I have learned a whole new level of data management. It is a potent tool that’s very easy to learn and use. It is a productivity multiplier!! Likewise, the Ablebits Support Team is highly professional, rapid responders, and helpful, a rare treat these days!

Jess Fowler , 12-Aug-22

If that’s not good service, I don’t know what is

Who wants to learn VBA? I know I didn’t when I was forced to learn it. Then came Ablebits, and I can never go back. Imagine someone giving you a flip phone now, in 2022. That’s what it’s like living without Ablebits. I had an issue where it was crashing in Excel, and I was distraught. After sending my feedback, I was greeted with an email and an updated key for the latest release, before I even made it that far in my troubleshooting. If that’s not good service, I don’t know what is. Can you guys just run all of our other vendors?

Jason Velez , 11-Aug-22

My Excel life changed a lot… for the better!

I believe it was around 2007-2008 when I discovered Ablebits and its table merge add-on. Since then, my «Excel life» changed a lot… for the better! I use it alongside other tools in the Ultimate Suite on a regular basis and have licensed it for people in my BD team. It is an invaluable tool!»

Marco Antonio Gonçalves , 10-Aug-22

Well worth the price of admission

Well worth the price of admission. If you’re doubting it, try it out. Even uninstalling is a breeze. I got this recommended from a co-worker for helping clean up duplicate data and manage complex editing. Went for the free trial, and was blown away. Better still, I had some trouble reinstalling things when my system got wiped. Support was on top of the issue fast and had me going again in a hurry. Incredible stuff.

Ultimate Suite is a treasure chest of useful tools

Ultimate Suite is a treasure chest of useful tools. I bought the it for the «Merge Tables tool», and it is worth the purchase price just for that. The other features I use are too numerous to mention. Ablebits makes a breeze of many tasks that would take a LOT of time to do using just formulas. It has revolutionized my work flow. And customer service is excellent.

Mark Newbold , 28-Jul-22

The best tools. Exactly what I needed

Ablebits Excel tools were exactly what I needed. We even recently updated to the newest version. Before finding Ablebits, I would have to spend two to three hours comparing two different workbooks each month. Not to mention the time I would have to spend combining cells with multiple lines of text. Ablebits has saved me time effort and I’m very grateful.

Emily Brown , 26-Jul-22

AbleBits has been a huge time saver

AbleBits has been a huge time saver for cleaning up client-provided lists. With just a simple click we can quickly and efficiently trim spaces, split names, standardize case, and combine related sheets. Plus it’s great to know there are so many other powerful tools in the software that are available whenever we need it.

Martin Weinberg, Founder, MarketGenesis , 17-Jul-22

That one program has given me years of convenience

It’s been years since I was desperate to be able to do additional functions in MS Excel and could not figure out how. I did an internet search — found Ablebits and that one program has given me years of convenience. I own my own business which always has been remote and using our CRM and our client’s databases all depend on MS Excel to add data. I don’t know what I would have done without this program. Customer Support even now is the best I have experienced. Thank you all for being there for me when other companies don’t care.

Liz Kaminski , 15-Jul-22

Ablebits is a dream come true for any Excel user

Ablebits is a dream come true for any Excel user working with data. I have used AbleBits for many years and thanks to regular updates the product has become a fantastic, time saving tool that no Excel user dealing with large data can do without. Your support deserve a special mention as it is prompt and always available.

Ilse Assmann , 7-Jul-22

This add-in is really valuable for a very reasonable cost

Ablebits Ultimate Suite for Microsoft Excel has been a time-saver and an excellent addition for my large data requirements. Rarely do I find a product that warrants spending on Excel, but this add-in is really valuable for a very reasonable cost. It installed like a charm, is intuitive, and I found customer service to be very responsive and helpful.

James Kennedy , 6-Jul-22

We couldn’t imagine being without this tool!

Managing and working with data has never been easier once we began utilizing Ablebits! The tool eliminates the need to learn complex excel formulas and provides straightforward tools to significantly increase our efficiency. What used to take a day now takes one hour. It’s easy to use and the support the Ablebits team provides is high quality. We couldn’t imagine being without this tool!

Pat Rorabeck , 28-Jun-22

Just want to say that I LOVE your Ultimate Suite Excel add-on

Just want to say that I LOVE your Ultimate Suite Excel add-on and would have quit my job had a colleague not recommended it to me. It has exceeded every expectation. I also want to give a shout out to someone named Ekaterina Pechyonkina, who was a tremendous help to me when I needed to migrate (same root word as migraine) from a desktop PC to a laptop. Please know that both your product and your people are making life better for those of us working with information. Thank you!!

Steve Cameron , 25-Mar-22

In the first 30 minutes of using Ablebits, I have already found at least ten different tools that will save me hours each month

I consider myself a high-level Excel user and often find myself reaching the outer limits of what Excel is capable of without some convoluted workaround, VBA, or writing a Python program. In the first 30 minutes of using Ablebits, I have already found at least ten different tools that will save me hours each month. I work with a lot of complex and very messy datasets, and Merge Two Tables, Combine Sheets, Merge Duplicates, Split Table, Trim Spaces, Change Case, etc. will make my life SO much easier. I am a very satisfied customer.

Bryant Phillips , 19-Feb-21

Your Ablebits are truly amazing

Your Ablebits are truly amazing, and better than Unix sed or awk, that is if my 73-year old memory is accurate, which is debatable! HA! It took fantasy football to get me to really explore the capabilities of Ablebits. I’ve won my league three of the last six years! I warned those whippersnappers that a retired IT guy with spreadsheet skills was going to be a problem!

Ablebits has allowed us to reduce timescale from hour to around 5-10 minutes

PRS use third party applications to share internal spreadsheets with a digital app based system to our staff & clients. The system primarily uses CSV format. We use Ablebits for ease of combining these type documents. Previously this task was undertaken manually (taking up to 1 hour per task). Ablebits has allowed us to reduce this timescale to around 5-10 minutes. In addition, the Ablebits team are extremely helpful & very quick to respond to queries.

Thomas Savine , 23-Nov-20

This software is by far the best I have ever purchased

In my line of work, this software is by far the best of any software/addon I have ever purchased/used. There is no close competition. My personality is such I don’t recommend any product/store, etc. Your product is the exception. I have recommended this product to a few and they have come back and thanked me.
Keep up the good work.

This product changed my working and investing experience

As a macro strategist and investor I deal in a large volume of data which I translate to a significant number of charts which I use then to interpret macro-economic trends, markets and investment opportunities. My challenge was how could I handle the large volume of charts in way that allowed me to update, modify and review them in an efficient way. I then found Ablebits suite for Microsoft Excel. This product changed my working and investing experience. The suite I started with and now the Ultimate Suite (2020 edition) provide a flawless experience. This is a terrific product at a great price. I recommend it unreservedly.

Tony Brinker , 23-Jun-20

Ablebits offers amazing services!

Their Ultimate Site is perfect for novice and advanced Excel users. Thanks to their Ultimate Suite, I can perform a number of data tasks at a click of the button! It’s perfect for data cleaning. And, their staff is very prompt and responsive. Trust me, this is an add on and company that won’t disappoint.

Lanita Warner , 27-Apr-20

Fantastic program

The Ablebits Data Merge Tables add- on is a fantastic program. It facilitates my projects for sure saving numerous hours of drudgery not to mention reducing the chance of error in manually importing data. I would definitely recommend it to anyone who needs to pull data from one Excel file to another. It’s worth every penny! I love it.

Dr. Douglas Boyd Ph.D. , 16-Sep-14

KUDOS to you guys for solving a problem that our IT department doesn’t understand

After our IT department thought they know how the sales department should function and destroyed some data files. With the help of Able Bits I was able to regenerate my database in just a few short clicks. This was AWESOME. KUDOS to you guys for solving a problem that even our IT department doesn’t understand. As a leader in the sales department I need my data to grow sales.

Erik Peterson , 24-Jun-14

AbleBits suite has really helped me when I was in a crunch!

Having AbleBits suite has really helped me when I was in a crunch! It was intuitive and really saved me time on my job! Now that the crunch is over, I’m finding there are other capabilities in the suite that I was not really aware of initially, (I originally only needed the easy merge capability). And those other features will / are valuable time savers as well. Thanks for the product!

I love the program, and I can’t imagine using Excel without it!

Thank you for your commitment to Ultimate Suite. I love the program, and I can’t imagine using Excel without it! Ultimate Suite saves me many hours of effort with the projects I manage within Excel. The program paid for itself the first day I used it. You and your team have created a really great set of tools for use within Microsoft Excel. Thank you, thank you, thank you.

Robert Madsen , 3-May-13

It is like having an expert at my shoulder helping me…

I really feel that Ablebits has people like me in mind with your software development. It is like having an expert at my shoulder helping me work more effectively and efficiently. Now I have more time to goof off at work — none the wiser. Uh, that last statement is not really true — I will just have a lot less stress because things will go so much smoother.

Источник

Let’s assume you have many worksheets, all in the same structure. Or they are at least in a similar structure. Now, you want to combine them into one worksheet. For example copying them underneath each other so that you can conduct lookups or insert PivotTables. In this article, you learn four methods to merge sheets in Excel.

Method 1: Copy and paste worksheets manually

In many cases it’s probably the fastest way to just copy and paste each sheet separately. That depends of course on the number of worksheets you want to combine and their structure. Some comments:

Try to use keyboard shortcuts as much as possible. For example for selecting the complete worksheet (Ctrl + A), copying the data (Ctrl + C), navigating to your combined worksheet (Ctrl + Page Up or Page Down) and pasting the copied cells (Ctrl + V).
Also the shortcut of pressing Ctrl on the keyboard and clicking on the little arrow in the left bottom corner of your worksheet could help. That way you jump to the first or last worksheet in your Excel workbook.
This method is especially useful if you just have to merge sheets once. If you need to do it repeatedly (for example you get new inputs every week or month) it’s probably better to check out methods 2 to 4 below.

Method 2: Use the INDIRECT formula to merge sheets

You can use Excel formulas to combine data from all worksheets. The main formula is INDIRECT.

This method has some disadvantages, though.

The INDIRECT formula in general is slow because it’s volatile. That means, it calculates each time Excel calculates something.
Using a combination of INDIRECT is usually unstable and error prone.
It takes some work to set up the INDIRECT formula.

On the other hand, it has one major advantage: If you spend effort to set it up, this method is dynamic. That means when your input updates, the merged worksheet updates as well.

Approach

Set up the INDIRECT formula for merging sheets.

The INDIRECT formula can access any cell from a link (or better: an address) you provide. Please refer to this article to learn more about the INDIRECT formula. So you only have to provide the addresses for each cell in each worksheet you want to combine. Therefore, you should prepare a worksheet the following way (please refer to the screenshot on the right-hand side):

Column A contains the sheet name.
Column B contains the row number.
Starting from Column C, you should add the column letters.

So let’s assume that you want to get the value from cell A1 of Sheet1. You would need then all the parts ‘Sheet1’, column ‘A’ and row ‘1’. Combining them in the INDIRECT formula would lead to the following formula. The formula in cell C4 is =INDIRECT(“‘”&$A4&”‘!”&C$2&$B4) .

Download

Copy this worksheet into your Excel file and all sheets are merged automatically.

You want to save some time? We prepared a worksheet which can merge sheets automatically. What do you have to do? Download this workbook (~7 MB) and copy the only sheet into your own workbook. That’s it.

Please note the following comments.

This method requires to enable macros (a list of all worksheets in your workbook is automatically created). When you want to save your workbook, you will be asked to switch to the XSLM file format.
This model works for up to 50 sheets with 200 rows each (10,000 cells are prepared). If you need more, you have to extend it. The reason for this restriction is that the file is already quite large and requires some calculation performance.

Method 3: Merge sheets with a VBA Macro

You feel confident enough to use a simple VBA macro? Please insert the following code into a new VBA module. If you need assistance with VBA, please refer to this article.

Sub Merge_Sheets()
    'Insert a new worksheet
    Sheets.Add
    
    'Rename the new worksheet
    ActiveSheet.Name = "ProfEx_Merged_Sheet"
    
    'Loop through worksheets and copy the to your new worksheet
    For Each ws In Worksheets
        ws.Activate
        
        'Don't copy the merged sheet again
        If ws.Name <> "ProfEx_Merged_Sheet" Then
            ws.UsedRange.Select
            Selection.Copy
            Sheets("ProfEx_Merged_Sheet").Activate
            
            'Select the last filled cell
            ActiveSheet.Range("A1048576").Select
            Selection.End(xlUp).Select
            
            'For the first worksheet you don't need to go down one cell
            If ActiveCell.Address <> "$A$1" Then
                ActiveCell.Offset(1, 0).Select
            End If
            
            'Instead of just paste, you can also paste as link, as values etc.
            ActiveSheet.Paste
        
        End If
        
    Next
End Sub

Method 4: Combine sheets with “Professor Excel Tools”

You like to use the most convenient way? Try the Excel add-in Professor Excel Tools.

Just select all the worksheets you’d like to merge,
click the button “Merge Sheets” and
click on “Start”.

Alternatively, you can further refine your desired settings: Do you want to add the original sheet name in column A? No problem.

Also, define the copy & paste mode as shown in the screenshot on the right-hand side.

This function is included in our Excel Add-In ‘Professor Excel Tools’

(No sign-up, download starts directly)

(New) Method 5: Merge sheets using the Office clipboard

The first method above already dealt with copying and pasting sheets manually. There is one more trick here: Use the Excel clipboard to merge sheets. It’s actually quite simple, just follow these steps.

Steps 1-3: Use the Office clipboard to quickly copy worksheets underneath each other.

Open the clipboard: Click on the small arrow in the right bottom corner of the Clipboard section (on the Home ribbon).
Now you can see the clipboard.
Next, go through each worksheet. Copy all ranges which you later want to merge on one worksheet.

Steps 4-5: Use the “Paste All” button of the clipboard to merge the sheets.

Now, you can see all your copied ranges in the clipboard.
Go to the sheet where you want to paste them underneath each other. Select the first cell.
Click on “Paste all”

That’s it. Especially with larger files, this method could save some time compared to method number 1 above. One small disadvantage: You can further adjust the pasting method, for example using paste special to paste values only.

Henrik Schiffner is a freelance business consultant and software developer. He lives and works in Hamburg, Germany. Besides being an Excel enthusiast he loves photography and sports.

Источник

Asked
11 years, 4 months ago

Viewed
339k times

I have found similar questions that deal with copying an entire worksheet in one workbook and pasting it to another workbook, but I am interested in simply copying an entire worksheet and pasting it to a new worksheet — in the same workbook.

I’m in the process of converting a 2003 .xls file to 2010 .xlsm and the old method used for copying and pasting between worksheets doesn’t paste with the correct row heights. My initial workaround was to loop through each row and grab the row heights from the worksheet I am copying from, then loop through and insert those values for the row heights in the worksheet I am pasting to, but the problem with this approach is that the sheet contains buttons which generate new rows which changes the row numbering and the format of the sheet is such that all rows cannot just be one width.

What I would really like to be able to do is just simply copy the entire worksheet and paste it. Here is the code from the 2003 version:

ThisWorkbook.Worksheets("Master").Cells.Copy
newWorksheet.Paste

I’m surprised that converting to .xlsm is causing this to break now. Any suggestions or ideas would be great.

pnuts

58k11 gold badges85 silver badges137 bronze badges

asked Dec 9, 2011 at 0:32

It is simpler just to run an exact copy like below to put the copy in as the last sheet

Sub Test()
Dim ws1 As Worksheet
Set ws1 = ThisWorkbook.Worksheets("Master")
ws1.Copy ThisWorkbook.Sheets(Sheets.Count)
End Sub

answered Dec 9, 2011 at 0:49

brettdjbrettdj

54.6k16 gold badges113 silver badges176 bronze badges

ThisWorkbook.Worksheets("Master").Sheet1.Cells.Copy _
    Destination:=newWorksheet.Cells

The above will copy the cells. If you really want to duplicate the entire sheet, then I’d go with @brettdj’s answer.

answered Dec 9, 2011 at 7:19

' Assume that the code name the worksheet is Sheet1

' Copy the sheet using code name and put in the end.
' Note: Using the code name lets the user rename the worksheet without breaking the VBA code
Sheet1.Copy After:=Sheets(Sheets.Count)

' Rename the copied sheet keeping the same name and appending a string " copied"
ActiveSheet.Name = Sheet1.Name & " copied"

answered Mar 31, 2014 at 20:46

thanos.athanos.a

2,0482 gold badges32 silver badges28 bronze badges

I really liked @brettdj’s code, but then I found that when I added additional code to edit the copy, it overwrote my original sheet instead. I’ve tweaked his answer so that further code pointed at ws1 will affect the new sheet rather than the original.

Sub Test()
    Dim ws1 as Worksheet
    ThisWorkbook.Worksheets("Master").Copy
    Set ws1 = ThisWorkbook.Worksheets("Master (2)")
End Sub

answered Jun 3, 2014 at 19:41

Kes PerronKes Perron

4555 gold badges10 silver badges24 bronze badges

'Make the excel file that runs the software the active workbook
ThisWorkbook.Activate

'The first sheet used as a temporary place to hold the data 
ThisWorkbook.Worksheets(1).Cells.Copy

'Create a new Excel workbook
Dim NewCaseFile As Workbook
Dim strFileName As String

Set NewCaseFile = Workbooks.Add
With NewCaseFile
    Sheets(1).Select
    Cells(1, 1).Select
End With

ActiveSheet.Paste

Olle Sjögren

5,2653 gold badges31 silver badges51 bronze badges

answered Dec 31, 2012 at 18:11

If anyone has, like I do, an Estimating workbook with a default number of visible pricing sheets, a Summary and a larger number of hidden and ‘protected’ worksheets full of sensitive data but may need to create additional visible worksheets to arrive at a proper price, I have variant of the above responses that creates the said visible worksheets based on a protected hidden «Master». I have used the code provided by @/jean-fran%c3%a7ois-corbett and @thanos-a in combination with simple VBA as shown below.

Sub sbInsertWorksheetAfter()

    'This adds a new visible worksheet after the last visible worksheet

    ThisWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count)

    'This copies the content of the HIDDEN "Master" worksheet to the new VISIBLE ActiveSheet just created

    ThisWorkbook.Sheets("Master").Cells.Copy _
        Destination:=ActiveSheet.Cells

    'This gives the the new ActiveSheet a default name

    With ActiveSheet
        .Name = Sheet12.Name & " copied"
    End With

    'This changes the name of the ActiveSheet to the user's preference

    Dim sheetname As String

    With ActiveSheet
        sheetname = InputBox("Enter name of this Worksheet")
        .Name = sheetname
    End With

End Sub

answered May 11, 2018 at 15:10

MaccusMaccus

311 silver badge8 bronze badges

Источник

Top 5 Different Ways to Copy or Move Sheets in Excel

Below are the five ways of copying a sheet in Excel.

By using the dragging method
By using the right-click method
Copy a sheet by using Excel RibbonRibbons in Excel 2016 are designed to help you easily locate the command you want to use. Ribbons are organized into logical groups called Tabs, each of which has its own set of functions.read more
Copy Sheet from Another Workbook
Copy Multiple Sheets in Excel

Top 5 Different Ways to Copy or Move Sheets in Excel
- #1 Copy Sheet by Dragging Method
- #2 Copy Sheet by Right- Click
- #3 Copy a Sheet by Using Excel Ribbon
- #4 Copy Excel Sheet from Another Workbook
- #5 Copy Multiple Sheets in Excel
- Things to Remember
- Recommended Articles

#1 Copy Sheet by Dragging Method

As per our understanding, drag and drop means to move something from one place to another. Therefore, this method is very easy and the fastest way of copying the sheet.

Below are the steps for copying a sheet by using a dragging method:

First, click on the sheet tab (Sheet1) that we want to copy. Next, you may refer to the below screenshot.
Now, press the “Ctrl” key and drag the Sheet1 where we want to place it then. It will create a copy of the Sheet1 with the name of Sheet1 (2) as per the below screenshot.

#2 Copy Sheet by Right- Click

It is also the easiest way to copy or make a duplicate sheet in Excel using a mouse. Below are the steps:

Step 1: We must first right-click on the sheet tab. It will open a drop-down list of options. Next, click on the “Move or Copy” option from the drop-down list.

Step 2: As a result, it will open the “Move or Copy” dialog box again. Refer to the below screenshot.

Step 3: Select the option under the “Before Sheet” section where we want to move or copy the sheet (Sheet1). Here, we want to copy the sheet at the end of the sheets. Hence, we selected the last option, “(move to end).” Tick on the box “Create a copy.” Click on “OK.”

Step 4: It will create a copy of Sheet1 like the below screenshot.

#3 Copy a Sheet by Using Excel Ribbon

For copying a sheet by using this method, follow the below steps:

Step 1: First, go to the “HOME” tab. Click on the “Format” option under the “Cells” section shown below screenshot (denoted by a red box).

Step 2: This will open a drop-down list of options. Click on the “Move or Copy Sheet” option, as shown in the below screenshot.

Step 3: Consequently, this will open a “Move or Copy” dialog box again, as shown below.

Follow the same steps under the copy sheet by right–click selection.

#4 Copy Excel Sheet from Another Workbook

If we have made some work on the Excel workbook and have to share some part of it or one sheet with someone. We do not want to share the whole workbook with him due to some critical and confidential information. In that case, we can use the option of copying the sheet from our workbook into a separate workbook.

The steps are the same, which we learned in the above section.

Step 1: We must first right-click on the sheet tab we want to copy and then choose the option “Move or Copy” from the drop-down list.

Step 2: The “Move or Copy” dialog box will appear in the screenshot below. Click on “To Book” and select the target file.

Step 3: To copy the sheet into a new workbook, select a new book. Then, under the “Before sheet” section, choose the destination where we want to place a copy of the sheet. Also, tick on the “Create a copy” checkbox, then click on “OK.”

#5 Copy Multiple Sheets in Excel

We also can copy multiple Excel sheets. Follow the below steps:

Step 1: For selecting adjacent sheets, we must click on the first sheet tab, press the “SHIFT” key, and click on the last sheet tab.

Step 2: For alternate or non-adjacent sheets, click on the first sheet tab, press the “CTRL” key, and click the other sheets tab, which we want to copy.

Step 3: After selecting multiple sheets, press a right-click. A dropdown list will open. First, choose the “Move or Copy” option. Then, follow the same steps as we discussed in the above section.

Things to Remember

When we open the “Move or Copy” dialog box, under the “To book” section, Excel displays only the open workbooks in the drop-down list. Hence, we must open the destination workbook before copying the sheet.

How to Manually Copy Multiple Sheets to Another Workbook

One way to copy multiple sheets to another workbook is to do it manually.

While this may take you a couple more clicks and a few more seconds, if you only need to do this once in a while, doing it manually is the way to go.

Now there can be two scenarios when you’re copying sheets:

Copy all the sheets (or selected sheets) to an already open workbook
Copy selected sheets to a new workbook

You can also think of a third scenario where you copy all the worksheets to a new workbook, but in that case, it’s more efficient to simply create a copy of the workbook instead of copying sheets.

Copy sheets to an already open workbook

Let’s first look at how to manually copy all sheets or multiple sheets to an already open Excel workbook:

Open the workbook that has the worksheets that you want to copy (as well as the one where you want these to be copied)
Hold down the CTRL key of your keyboard and select the tabs of the sheets that you want to copy.
Keeping your cursor on any one of these selected sheet tabs, right-click with your mouse
Select “Move or Copy” from the popup menu that appears. This will open the “Move or Copy” dialog box.
In the ‘Move or Copy’ dialog box, click on the ‘To book:’ drop-down and select the workbook name to which you want to copy the selected sheets
Check the ‘Create a Copy’ option (if not checked, your sheets will be removed from the current workbook and moved to the new one).
Click OK.

The above steps would move a copy of all the selected sheets to the selected workbook.

Pro Tip: In case you want to select all the sheets at one go, select the first sheet tab, hold the SHIFT key, and then select the last sheet tab. This will select all the sheets in between as well.

Copy selected sheets to a new workbook

Now let’s see how to copy and move some of the sheets in the current workbook into a new workbook.

Below are the steps to do this:

Open the workbook that has the worksheets that you want to copy
Hold down the CTRL key of your keyboard and select the tabs of the sheets that you want to copy.
Keeping your cursor on any one of these selected sheet tabs, right-click with your mouse
Select “Move or Copy” from the popup menu that appears. This will open the “Move or Copy” dialog box.
In the ‘Move or Copy’ dialog box, click on the ‘To book:’ drop-down and select ‘(new book)’ option
Check the ‘Create a Copy’ option (if not checked, your sheets will be removed from the current workbook and moved to the new one).
Click OK.

The above steps would automatically create a new workbook and copy the selected sheets into this new workbook. Note that these are copies and the original worksheet still remains in the original workbook (since we checked the ‘Create a Copy’ option).

Now you can save this new workbook that has the copied sheets.

Copy Sheets to Another Workbook (Using VBA)

Copying sheets manually is fine if you have to do it once in a while, but if you have to do it regularly, then automating this using VBA can be better.

In this section, I will cover some scenarios where you can use VBA to copy sheets from one workbook into another.

Copy Sheets with Specific Names Into Another Workbook

If you always have this need to copy sheets with a specific name to a new workbook, you can easily do this with a simple VBA code.

The below code with copy and move the sheets with the name “Sales”, “Marketing” and “Operations” into a new workbook. Of course, you can change the names and add/remove more sheets to be a part of this code.

Sub CopySheets()
Workbooks("Book1.xlsx").Sheets("Sales").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
Workbooks("Book1.xlsx").Sheets("Marketing").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
Workbooks("Book1.xlsx").Sheets("Operations").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
End Sub

The above code simply copies the sheets with the specified name (Sales, Marketing, Operations in this example) and move the copy to the destination workbook (which is Dbook.xlsx)

In this case, you can run the VBA code in any of the workbooks.

Another good use-case of this code could be when you have multiple workbooks and you want to copy and bring specific worksheets into the destination workbook.

For example, suppose you have three workbooks – with the name WB1, WB2, and WB3, and you want to get the sheets from these workbooks into the destination workbook.

Instead of doing it one at a time for each workbook, you can tweak the above VBA code to get specific sheets from multiple workbooks into the destination workbook.

Below is the code that’s will copy and move a sheet (named “Summary”) from all the workbooks into the destination workbook (DBook.xlsx in this example).

Sub CopySheets()
Workbooks("Sales.xlsx").Sheets("Summary").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
Workbooks("Marketing.xlsx").Sheets("Summary").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
Workbooks("Operations.xlsx").Sheets("Summary").Copy _
    After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
End Sub

This VBA code needs to be run in the DBook.xlsx workbook.

Copy Sheets with Specific Text Into Another Workbook

In some cases, you may have a workbook and you want to copy all the sheets that have a specific word in it.

For example, I may want to copy and move all the sheets that have the text 2020 in it to another workbook (let’s say DBook.xlsx).

The following VBA code can do this:

Sub CopySheets()
Dim Sh As Worksheet
For Each Sh In Worksheets
    If InStr(1, Sh.Name, "2020", vbBinaryCompare) > 0 Then
        Sh.Copy After:=Workbooks("Dbook.xlsx").Sheets(Workbooks("Dbook.xlsx").Sheets.Count)
    End If
Next Sh
End Sub

The above uses the INSTR function to find the position of the text 2020 in the sheet name. If it finds the text in the sheet name, then it copies that sheet, else it doesn’t.

So this code will make sure that only those sheets that have a specific text string in it are copied.

This can be really useful if you have a huge workbook and you want to quickly segregate sheets based on the year or department or any other code which is mentioned in each sheet name.

This VBA code needs to be run in the sheet where you have the sheets that need to be copied. Also, note that you need to have the destination workbook open for this to work.

So these are some of the ways you can use to copy multiple sheets to a new workbook or any other open workbook. In most cases, doing it manually will serve the purpose, but in case you need to do this quite regularly, you can also automate this process using the simple VBA codes mentioned above.

I hope you found this Excel tutorial useful!

Other Excel tutorials you may like:

How to Delete a Sheet in Excel Using VBA
How to Print Multiple Tabs/Sheets in Excel
How to Unhide All Rows in Excel with VBA
How to Move a Chart to a New Sheet in Excel
How to Save Selection in Excel as PDF
3 Ways to Duplicate Sheet in Excel
How to Merge Two Excel Files?
How to Link Cells in Excel (Same Worksheet, Between Worksheets/Workbooks)
Insert New Sheet in Excel (Shortcut)

Источник

Copy Excel Sheet (Table of Contents)

Copy Sheet in Excel
How to Copy an Excel Sheet?

Copy Sheet in Excel

There are 2 ways to copy any worksheet. By the first way, click right on any Sheet name tab name and then select the Move Or Copy option from the right-click menu list. Then from Move Or Copy box, check the box of Create A Copy with a tick and press Ok to proceed with creating a copy of that sheet. In a second way, select the sheet we want to copy, then process Ctrl and drag that sheet on the Plus sign beside the sheet name. This will create a copy of the selected sheet keeping the word COPY in the brackets.

There are multiple ways where we can do this task.

Move Sheet within the same workbook: This will move the worksheet to the end or the start in the same workbook.
Copy Sheet within the same workbook: This will create a carbon copy of the same worksheet.
Move Sheet to Another workbook: This will move the worksheet from one workbook to another workbook. It will move the sheet to a new workbook but will disappear from the existing worksheet if you move.
Copy Sheet to Another workbook: This will copy the worksheet from one workbook to another workbook with the copy of the existing worksheet.

How to Copy an Excel Sheet?

Copy Excel Sheet is very simple and easy to use. Let’s understand the working of copying excel sheets by using some different methods.

You can download this Copy Excel Sheet Template here – Copy Excel Sheet Template

Method #1 – Move Sheet within the same workbook

If you want to move the active sheet to the end of the worksheet, you can apply this method. For example, look at the below image. I have a total of 3 worksheets.

Right now, Sheet 1 is at the beginning of all the worksheets. So I want to move this sheet to the end of the works sheet.

Right-click on Sheet 1 and select Move or Copy

The shortcut key to open Move or Copy is Alt + E + M.

Once you click on Move or Copy, it will show you a new window. In the new window, select (move to end).

This will move this sheet to the end.

Method #2 – Copy Sheet within the same workbook

If you want to create a copy or a replica of the existing worksheet in the same workbook, we can apply this method.

I will take the same workbook here as well. I want to create a replica of Sheet 1.

Right-click on Sheet 1 and select Move or Copy.

Once you click on Move or Copy, it will show you the new window. In the new window, select Sheet 1 & check the box, create a copy, and click on OK.

It will create a copy of the worksheet for you. The new sheet will be the same as the existing worksheet with (2) in front of it.

Method #3 – Move Sheet to Another workbook

If you want to move the entire worksheet to a new workbook, you can apply this method. For this, we need a minimum of two workbooks to be opened. My two workbook names are Worksheet 1 and Worksheet 2.

I have opened both the worksheets at this point in time. In the workbook Worksheet 2, I have a sheet name called Data Sheet, and I want to move this worksheet to another workbook called Worksheet 1.

Right-click on the sheet you want to move and select Move or Copy.

Once you select this option, it will show you the new window.

In this window, there is a drop-down called To book. Click on this drop-down. It will show you all the opened workbooks; select the workbook which you want to move. I have selected the workbook called Worksheet 1. I am not going to create a copy of the worksheet, but I am just moving it to another workbook.

Once you select the new workbook name, it will show you that workbook’s worksheets. Select the option of (move to end). Click on OK to complete the process.

It also deletes the sheet in the workbook called Worksheet 2.

Method #4 – Copy Sheet to Another workbook

If you want to copy the entire worksheet to a new workbook, you can apply this method.

Right-click on the sheet you want to move and select Move or Copy. Here I have selected the sheet called Data Sheet in the workbook called Worksheet 2.

Once you select this option, it will show you the new window.

There is a drop-down called To book in this window: Click on this drop-down; it will show you all the opened workbooks and select the workbook you want to move. I have selected the workbook called Worksheet 1. Here I am selecting the option Create a copy. Once you select the new workbook name, it will show you that workbook’s worksheets. Select the option of (move to end). Click on OK.

It will create a copy of this worksheet to another workbook.

Things to Remember about Copy Excel Sheet

Based on the requirement, we can choose whether to move or copy the excel sheet.
The shortcut key to open the Move or Copy sheet is ALT + E + M.
We need to select the required workbook name To book: drop-down list.
If you want to move the sheet to the extreme end, we need to choose the option (move to end).

Sections:

Quickly Copy Data/Formatting to Multiple Worksheets

Delete Data Across Worksheets

Notes

Quickly Copy Data/Formatting to Multiple Worksheets in Excel

Quick version: Select data to copy > Hold Ctrl or Shift and select worksheets to copy to > Home tab > Fill button (right side of the ribbon menu) > Across Worksheets > OK.

Select the data to be copied. You can select specific ranges, tables, or even the entire worksheet itself.
Hold Ctrl and click the worksheets to which you want to copy the data or formatting. If you hold Shift and click the last worksheet in the workbook, then all worksheets will be selected.
Go to the Home tab and look to the right and click the Fill button and then Across Worksheets
In the window that opens, choose if you want to copy the just the Formatting, Contents of the cells, or All (everything).
Hit OK and That’s it!

Now, if you go to the other worksheet tabs that you selected, you will see the result:

Notice that all formatting and data copied over; this includes the conditional formatting that was listed for the cells and the formulas in the Highest/Lowest/Total columns.

If you didn’t want to copy the sales data for the table over, you could have individually selected the ranges to copy across the worksheets and copied them one-by-one using the above method; or, you could copy it all and follow the steps in the next section to delete the data for the sales.

Delete Data Across Worksheets

If you copied all of your master worksheet, like in the above example, but you want to remove some parts from the copied worksheets, follow these simple steps:

Go to one of the worksheets with the copied data.
Select the data that you want to delete.
Hold Ctrl and select all other worksheet tabs from which you want to delete this data.
Hit Delete.

This will duplicate the delete command to all selected worksheets.

Notes

This technique is wonderful when you spend time creating a template in one worksheet and want to duplicate that out to all, or a selection, of the worksheets in the workbook.

Download the sample file to see the above Example in Excel.

Subscribe for Weekly Tutorials

BONUS: subscribe now to download our Top Tutorials Ebook!

Источник