Bottom line: Learn 3 different ways to copy and paste cells or ranges in Excel with VBA Macros. This is a 3-part video series and you can also download the file that contains the code.
Skill level: Beginner
Copy & Paste: The Most Common Excel Action
Copy and paste is probably one of the most common actions you take in Excel. It’s also one of the most common tasks we automate when writing macros.
There are a few different ways to accomplish this task, and the macro recorder doesn’t always give you the most efficient VBA code.
In the following three videos I explain:
- The most efficient method for a simple copy and paste in VBA.
- The easiest way to paste values.
- How to use the PasteSpecial method for other paste types.
You can download the file I use in these videos below. The code is also available at the bottom of the page.
Video #1: The Simple Copy Paste Method
You can watch the playlist that includes all 3 videos at the top of this page.
Video #2: An Easy Way to Paste Values
Video #3: The PasteSpecial Method Explained
VBA Code for the Copy & Paste Methods
Download the workbook that contains the code.
'3 Methods to Copy & Paste with VBA
'Source: https://www.excelcampus.com/vba/copy-paste-cells-vba-macros/
'Author: Jon Acampora
Sub Range_Copy_Examples()
'Use the Range.Copy method for a simple copy/paste
'The Range.Copy Method - Copy & Paste with 1 line
Range("A1").Copy Range("C1")
Range("A1:A3").Copy Range("D1:D3")
Range("A1:A3").Copy Range("D1")
'Range.Copy to other worksheets
Worksheets("Sheet1").Range("A1").Copy Worksheets("Sheet2").Range("A1")
'Range.Copy to other workbooks
Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Copy _
Workbooks("Book2.xlsx").Worksheets("Sheet1").Range("A1")
End Sub
Sub Paste_Values_Examples()
'Set the cells' values equal to another to paste values
'Set a cell's value equal to another cell's value
Range("C1").Value = Range("A1").Value
Range("D1:D3").Value = Range("A1:A3").Value
'Set values between worksheets
Worksheets("Sheet2").Range("A1").Value = Worksheets("Sheet1").Range("A1").Value
'Set values between workbooks
Workbooks("Book2.xlsx").Worksheets("Sheet1").Range("A1").Value = _
Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Value
End Sub
Sub PasteSpecial_Examples()
'Use the Range.PasteSpecial method for other paste types
'Copy and PasteSpecial a Range
Range("A1").Copy
Range("A3").PasteSpecial Paste:=xlPasteFormats
'Copy and PasteSpecial a between worksheets
Worksheets("Sheet1").Range("A2").Copy
Worksheets("Sheet2").Range("A2").PasteSpecial Paste:=xlPasteFormulas
'Copy and PasteSpecial between workbooks
Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Copy
Workbooks("Book2.xlsx").Worksheets("Sheet1").Range("A1").PasteSpecial Paste:=xlPasteFormats
'Disable marching ants around copied range
Application.CutCopyMode = False
End Sub
Paste Data Below the Last Used Row
One of the most common questions I get about copying and pasting with VBA is, how do I paste to the bottom of a range that is constantly changing? I first want to find the last row of data, then copy & paste below it.
To answer this question, I created a free training video on how to paste data below the last used row in a sheet with VBA. Can I send you the video? Please click the image below to get the video.
Free Training on Macros & VBA
The 3 videos above are from my VBA Pro Course. If you want to learn more about macros and VBA then checkout my free 3-part video training series.
I will also send you info on the VBA Pro Course, that will take you from beginner to expert. Click the link below to get instant access.
Free Training on Macros & VBA
Please leave a comment below with any questions. Thanks!
Copy and paste are 2 of the most common Excel operations. Copying and pasting a cell range (usually containing data) is an essential skill you’ll need when working with Excel VBA.
You’ve probably copied and pasted many cell ranges manually. The process itself is quite easy.
Well…
You can also copy and paste cells and ranges of cells when working with Visual Basic for Applications. As you learn in this Excel VBA Tutorial, you can easily copy and paste cell ranges using VBA.
However, for purposes of copying and pasting ranges with Visual Basic for Applications, you have a variety of methods to choose from.
My main objective with this Excel tutorial is to introduce to you the most important VBA methods and properties that you can use for purposes of carrying out these copy and paste activities with Visual Basic for Applications in Excel. In addition to explaining everything you need to know in order to start using these different methods and properties to copy and paste cell ranges, I show you 8 different examples of VBA code that you can easily adjust and use immediately for these purposes.
The following table of contents lists the main topics (and VBA methods) that I cover in this blog post. Use the table of contents to navigate to the topic that interests you at the moment, but make sure to read all sections 😉 .
Let’s start by taking a look at some information that will help you to easily modify the source and destination ranges of the sample macros I provide in the sections below (if you need to).
Scope Of Macro Examples In This Tutorial And How To Modify The Source Or Destination Cells
As you’ve seen in the table of contents above, this Excel tutorial covers several different ways of copying and pasting cells ranges using VBA. Each of these different methods is accompanied by, at least, 1 example of VBA code that you can adjust and use immediately.
All of these macro examples assume that the sample workbook is active and the whole operation takes place on the active workbook. Furthermore, they are designed to copy from a particular source worksheet to another destination worksheet within that sample workbook.
You can easily modify these behaviors by adjusting the way in which the object references are built. You can, for example, copy a cell range to a different worksheet or workbook by qualifying the object reference specifying the destination cell range.
Similar comments apply for purposes of modifying the source and destination cell ranges. More precisely, to (i) copy a different range or (ii) copy to a different destination range, simply modify the range references.
For example, in the VBA code examples that I include throughout this Excel tutorial, the cell range where the source data is located is referred to as follows:
Worksheets("Sample Data").Range("B5:M107")
This reference isn’t a fully qualified object reference. More precisely, it assumes that the copying and pasting operations take place in the active workbook.
The following reference is the equivalent of the above, but is fully qualified:
Workbooks("Book1.xlsm").Worksheets("Sample Data").Range("B5:M107")
This fully qualified reference doesn’t assume that Book1.xlsm is the active workbook. Therefore, the reference works appropriately regardless of which Excel workbook is active.
I explain how to work with object references in detail in The Essential Guide To Excel’s VBA Object Model And Object References. Similarly, I explain how to work with cell ranges in Excel’s VBA Range Object And Range Object References: The Tutorial for Beginners. I suggest you refer to these posts if you feel you need to refresh your knowledge about these topics, or if you’re not familiar with them. They will probably help you to better understand this Excel tutorial and how to modify the sample macros I include here.
You’ll also notice that within the VBA code examples that I include in this Excel tutorial, I always qualify the references up to the level of the worksheet. Strictly speaking, this isn’t always necessary. In fact, when implementing similar code in your VBA macros, you may want to modify the references by, for example:
- Using variables.
- Further simplifying the object references (not qualifying them up to the level of the worksheet).
- Using the With… End With statement.
The reason I’ve decided to keep references qualified up to the level of the worksheet is because the focus of this Excel tutorial is on how to copy and paste using VBA. Not on simplifying references or using variables, which are topics I cover in separate blog posts, such as those I link to above (and which I suggest you take a look at).
The Copy Command In Excel’s Ribbon
Before we go into how to copy a range using Visual Basic for Applications, let’s take a quick look at Excel’s ribbon:
Perhaps one of the most common used buttons in the Ribbon is “Copy”, within the Home tab.
When you think about copying ranges in Excel, you’re probably referring to the action carried out by Excel when you press this button: copying the current active cell or range of cells to the Clipboard.
You may have noticed, however, that the Copy button isn’t just a simple button. It’s actually a split button:
I explain how you can automate the functions of both of these commands in this Excel tutorial. More precisely:
- If you want to work with the regular Copy command, you’ll want to read more about the Range.Copy method, which I explain in the following section.
- If you want to use the Copy as Picture command, you’ll be interested in the Range.CopyPicture method, which I cover below.
Let’s start by taking a look at…
Excel VBA Copy Paste With The Range.Copy Method
The main purpose of the Range.Copy VBA method is to copy a particular range.
When you copy a range of cells manually by, for example, using the “Ctrl + C” keyboard shortcut, the range of cells is copied to the Clipboard. You can use the Range.Copy method to achieve the same thing.
However, the Copy method provides an additional option:
Copying the selected range to another range. You can achieve this by appropriately using the Destination parameter, which I explain in the following section.
In other words, you can use Range.Copy for copying a range to either of the following:
- The Clipboard.
- A certain range.
The Range.Copy VBA Method: Syntax And Parameters
The basic syntax of the Range.Copy method is as follows:
expression.Copy(Destination)
“expression” is the placeholder for the variable representing the Range object that you want to copy.
The only parameter of the Copy VBA method is Destination. This parameter is optional, and allows you to specify the range to which you want to copy the copied range. If you omit the Destination parameter, the copied range is simply copied to the Clipboard.
This means that the appropriate syntax you should use for the Copy method (depending on your purpose) is as follows:
- To copy a Range object to the Clipboard, omit the Destination parameter. In such a case, use the following syntax:
expression.Copy
- To copy the Range object to another (the destination) range, use the Destination parameter to specify the destination range. This means that you should use the following syntax:
expression.Copy(Destination)
Let’s take a look at how you can use the Range.Copy method to copy and paste a range of cells in Excel:
Macro Examples #1 And #2: The VBA Range.Copy Method
This Excel VBA Copy Paste Tutorial is accompanied by an Excel workbook containing the data and macros I use. You can get immediate free access to this workbook by clicking the button below.
For this particular example, I’ve created the following table. This table displays the sales of certain items (A, B, C, D and E) made by 100 different sales managers in terms of units and total Dollar value. The first row (above the main table), displays the unit price for each item. The last column displays the total value of the sales made by each manager.
Macro Example #1: Copy A Cell Range To The Clipboard
First, let’s take a look at how you can copy all of the items within the sample worksheet (table and unit prices) to the Clipboard. The following simple macro (called “Copy_to_Clipboard”) achieves this:
This particular Sub procedure is made out of the following single statement:
Worksheets("Sample Data").Range("B5:M107").Copy
This statement is made up by the following 2 items:
Let’s take a look at this macro in action. Notice how, once I execute the Copy_to_Clipboard macro, the copied range of cells is surrounded by the usual dashed border that indicates that the range is available for pasting.
After executing the macro, I go to another worksheet and paste all manually. As a last step, I autofit the column width to ensure that all the data is visible.
Even though the sample Copy_to_Clipboard macro does what it’s supposed to do and is a good introduction to the Range.Copy method, it isn’t very powerful. It, literally, simply copies the relevant range to the Clipboard. You don’t really need a macro to do only that.
Fortunately, as explained above, the Range.Copy method has a parameter that allows you to specify the destination of the copied range. Let’s use this to improve the power of the sample macro:
Macro Example #2: Copy A Cell Range To A Destination Range
The following sample Sub procedure (named “Copy_to_Range”) takes the basic Copy_to_Clipboard macro used as example #1 above and adds the Destination parameter.
Even though it isn’t the topic of this Excel tutorial, I include an additional statement that uses the Range.AutoFit method.
Let’s take a closer look at each of the lines of code within this sample macro:
Line #1: Worksheets(“Sample Data”).Range(“B5:M107”).Copy
This is, substantially, the sample “Copy_to_Clipboard” macro which I explain in the section above.
More precisely, this particular line uses the Range.Copy method for purposes of copying the range of cells cells B5 and M107 of the worksheet called “Sample Data”.
However, at this point of the tutorial, our focus isn’t in the Copy method itself but rather in the Destination parameter which appears in…
Line #2: Destination:=Worksheets(“Example 2 – Destination”).Range(“B5:M107”)
You use the Destination parameter of the Range.Copy method for purposes of specifying the destination range in which to which the copied range of cells should be copied. In this particular case, the destination range is cells B5 to M107 of the worksheet named “Example 2 – Destination”, as shown in the image below:
As I explain above, you can easily modify this statement for purposes of specifying a different destination. For example, for purposes of specifying a destination range in a different Excel workbook, you just need to qualify the object reference.
Line #3: Worksheets(“Example 2 – Destination”).Columns(“B:M”).AutoFit
As anticipated above, this statement isn’t absolutely necessary for the sample macro to achieve its main purpose of copying the copied range in the destination range. Its purpose is solely to autofit the column width of the destination range.
For these purposes, I use the Range.Autofit method. The syntax of this method is as follows:
expression.AutoFit
In this particular case, “expression” represents a Range object, and must be either (i) a range of 1 or more rows, or (ii) a range of 1 or more columns. In the Copy_to_Range macro example, the Range object is columns B through M of the worksheet titled “Example 2 – Destination”. The following image shows how this range is specified within the VBA code.
The following image shows the results obtained when executing the Copy_to_Range macro. Notice how this worksheet looks substantially the same as the source worksheet displayed above.
If you were to compare the results obtained when copying a range to the Clipboard (example #1) with the results obtained when copying the range to a destination range (example #2), you may conclude that the general rule is that one should always use the Destination parameter of the Copy method.
To a certain extent, this is generally true and some Excel authorities generally discourage using the Clipboard. However, the choice between copying to the Clipboard or copying to a destination range isn’t always so straightforward. Let’s take a look at why this is the case:
The Range.Copy VBA Method: When To Copy To The Clipboard And When To Use The Destination Parameter
In my opinion, if you can achieve your purposes without copying to the Clipboard, you should simply use the Destination parameter of the Range.Copy method.
Using the Destination parameter is, generally, more efficient that copying to the Clipboard and then using the Range.PasteSpecial method or the Worksheet.Paste method (both of which I explain below). Copying to the Clipboard and pasting (with the Range.PasteSpecial or Worksheet.Paste methods) involves 2 steps:
- Copying.
- Pasting.
This 2-step process (usually):
- Increases the procedure’s memory requirements.
- Results in (slightly) less efficient procedures.
I explain this argument further in example #4 below, which introduces the Worksheet.Paste method. The Worksheet.Paste method is one of the VBA methods you’d use for purposes of pasting the data that you’ve copied to the Clipboard with the Range.Copy method.
Avoiding the Clipboard whenever possible may be a good idea to reduce the risks of data loss or leaks of information whenever another application is using the Clipboard at the same time. Some users report unpredictable Clipboard behavior in certain cases.
Considering this arguments, you probably understand why I say that, if you can avoid the Clipboard, you probably should.
However, using the Range.Copy method with the Destination parameter may not be the most appropriate solution always. For purposes of determining when the Destination parameter allows you to achieve the purpose you want, it’s very important that you’re aware of how the Range.Copy method works, particularly what it can (and can’t do). Let’s see an example of what I mean:
If you go back to the screenshots showing the results of executing the sample macros #1 (Copy_to_Clipboard) and #2 (Copy_to_Range), you’ll notice that the end result is that the destination worksheet looks pretty much the same as the source worksheet.
In other words, Excel copies and pastes all (for ex., values, formulas, formats).
In some cases, this is precisely what you want. However:
In other cases, this is precisely what you don’t want. Take a look, for example, at the following Sub procedure:
At first glance, this is the Copy_to_Range macro that I introduce and explain in the section above. Notice, however, that I’ve changed the Destination parameter. More precisely, in this version of the Copy_to_Range macro, the top-left cell of the destination range is cell B1 (instead of B5, as it was originally) of the “Example 2 – Destination” worksheet.
The following GIF shows what happens when I execute this macro. The worksheet shown is the destination “Example 2 – Destination” worksheet, and I’ve enabled iterative calculations (I explain to you below why I did this).
As you can see immediately, there’s something wrong. The total sales for all items are, clearly, inaccurate.
The reason for this is that, in the original table, I used mixed references in order to refer to the unit prices of the items. Notice, for example, the formula used to calculate the total sales of Item A made by Sarah Butler (the first Sales Manager in the table):
These formulas aren’t a problem as long as the destination cells are exactly the same as the source cells. This is the case in both examples #1 and #2 above where, despite the worksheet changing, the destination continues to be cells B5 to M107. That guarantees that the mixed references continue to point to the right cell.
However, once the destination range changes (as in the example above), the original mixed references wreak havoc on the worksheet. Take a look, for example, at the formula used to calculate the total sales of Item B by Sales Manager Walter Perry (second in the table):
The formula doesn’t use the unit price of Item B (which appears in cell F1) to calculate the sales. Instead, it uses cell F5 as a consequence of the mixed references copied from the source worksheet. This results in (i) the wrong result and (ii) a circular reference.
By the way, if you’re downloading the sample workbook that accompanies this Excel tutorial, it will have circular references.
In such (and other similar) cases, you may not want to rely solely on the Range.Copy method with the Destination parameter. In other words: There are cases where you don’t want to copy and paste all the contents of the source cell range. There are, for example, cases where you may want to:
- Copy a cell range containing formulas; and
- Paste values in the destination cell range.
This is precisely what happens in the case of the example above. In such a situation, you may want to paste only the values (no formulas).
For purposes of controlling what is copied in a particular destination range when working with VBA, you must understand the Range.PasteSpecial method. Let’s take a look at it:
Excel VBA Copy Paste With The Range.PasteSpecial Method
Usually, whenever you want to control what Excel copies in a particular destination range, you rely on the Paste Special options. You can access these options, for example, through the Paste Special dialog box.
When working with Visual Basic for Applications, you usually rely on the Range.PasteSpecial method for purposes of controlling what is copied in the destination range.
Generally speaking, the Range.PasteSpecial method allows you to paste a particular Range object from the Clipboard into the relevant destination range. This, by itself, isn’t particularly exciting.
The power of the Range.PasteSpecial method comes from its parameters, and the ways in which they allow you to further determine the way in which Excel carries out the pasting. Therefore, let’s take a look at…
The Range.PasteSpecial VBA Method: Syntax And Parameters
The basic syntax of the Range.PasteSpecial method is as follows:
expression.PasteSpecial(Paste, Operation, SkipBlanks, Transpose)
“expression” represents a Range object. The PasteSpecial method has 4 optional parameters:
- Parameter #1: Paste.
- Parameter #2: Operation.
- Parameter #3: SkipBlanks.
- Parameter #4: Transpose.
Notice how each of these parameters roughly mimics most of the different sections and options of the Paste Special dialog box shown above. The main exception to this general rule is the Paste Link button.
I explain how you can paste a link below.
For the moment, let’s take a closer look at each of these parameters:
Parameter #1: Paste
The Paste parameter of the PasteSpecial method allows you to specify what is actually pasted. This parameter is the one that, for example, allows you specify that only the values (or the formulas) should be pasted in the destination range.
This is, roughly, the equivalent of the Paste section in the Paste Special dialog box shown below:
The Paste parameter can take any of 12 values that are specified in the XlPasteType enumeration:
Parameter #2: Operation
The Operation parameter of the Range.PasteSpecial method allows you to specify whether a mathematical operation is carried out with the destination cells. This parameter is roughly the equivalent of the Operation section of the Paste Special dialog box.
The Operation parameter can take any of the following values from the XlPasteSpecialOperation enumeration:
Parameter #3: SkipBlanks
You can use the SkipBlanks parameter of the Range.PasteSpecial method to specify whether the blank cells in the copied range should be (or not) pasted in the destination range.
SkipBlanks can be set to True or False, as follows:
- If SkipBlanks is True, the blank cells within the copied range aren’t pasted in the destination range.
- If SkipBlanks is False, those blank cells are pasted.
False is the default value of the SkipBlanks parameter. If you omit SkipBlanks, the blank cells are pasted in the destination range.
Parameter #4: Transpose
The Transpose parameter of the Range.PasteSpecial VBA method allows you to specify whether the rows and columns of the copied range should be transposed (their places exchanged) when pasting.
You can set Transpose to either True or False. The consequences are as follows:
- If Transpose is True, rows and columns are transposed when pasting.
- If Transpose is False, Excel doesn’t transpose anything.
The default value of the Transpose parameter is False. Therefore, if you omit it, Excel doesn’t transpose the rows and columns of the copied range.
Macro Example #3: Copy And Paste Special
Let’s go back once more to the sample macros and see how we can use the Range.PasteSpecial method to copy and paste the sample data.
The following sample Sub procedure, called “Copy_PasteSpecial” shows 1 of the many ways in which you can do this:
When using the Range.Copy method to copy to the Clipboard (as in the case above) you can end the macro with the statement “Application.CutCopyMode = False”, which I explain in more detail towards the end of this blog post. This particular statement cancels Cut or Copy mode and removes the moving border.
Let’s take a look at each of the lines of code to understand how this macro achieves its purpose:
Line #1: Worksheets(“Sample Data”).Range(“B5:M107”).Copy
This statement appears in both of the previous examples.
As explained in those previous sections, its purpose is to copy the range between cells B5 and M107 of the worksheet named “Sample Data” to the Clipboard.
Lines #2 Through #6 Worksheets(“Example 3 – PasteSpecial”).Range(“B5”).PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlPasteSpecialOperationNone, SkipBlanks:=False, Transpose:=True
These lines of code make reference to the Range.PasteSpecial method that I explain in the previous section. In order to take a closer look at it, let’s break down this statement into the following 6 items:
And let’s take a look at each of the items separately:
- Item #1: “Worksheets(“Example 3 – PasteSpecial”).Range(“B5″)”.
- This is a Range object. Within the basic syntax of the PasteSpecial method that I introduce above, this item is the “expression”.
- This range is the destination range, where the contents of the Clipboard are pasted. In this particular case, the range is identified by its worksheet (“Example 3 – PasteSpecial” of the active workbook) and the upper-left cell of the cell range (B5).
- To paste the items that you have in the Clipboard in a different workbook, simply qualify this reference as required and explained above.
- Item #2: “PasteSpecial”.
- This item simply makes reference to the Range.PasteSpecial method.
- Item #3: “Paste:=xlPasteValuesAndNumberFormats”.
- This is the Paste parameter of the PasteSpecial method. In this particular case, the argument is set to equal xlPasteValuesAndNumberFormats. The consequence of this, as explained above, is that only values and number formats are pasted. Other items, such as formulas and borders, aren’t pasted in the destination range.
- Item #4: “Operation:=xlPasteSpecialOperationNone”.
- The line sets the Operation parameter of the Range.PasteSpecial method to be equal to xlPasteSpecialOperationNone. As I mention above, this means that Excel carries out no calculation when pasting the contents of the Clipboard.
- Item #5: “SkipBlanks:=False”.
- This line confirms that the value of the SkipBlanks parameter is False (which is its default value anyway). Therefore, if there were blank cells in the range held by the Clipboard, they would be pasted in the destination.
- Item #6: “Transpose:=True”.
- The final parameter of the Range.PasteSpecial method (Transpose) is set to True by this line. As a consequence of this, rows and columns are transposed upon being pasted.
The purpose of this code example is just to show you some of the possibilities that you have when working with the Range.PasteSpecial VBA method. It doesn’t mean it’s how I would arrange the data it in real life. For example, if I were implementing a similar macro for copying similarly organized data, I wouldn’t transpose the rows and columns (you can see how the transposing looks like in this case further below).
In any case, since the code includes all of the parameters of the Range.PasteSpecial method, and I explain all of those parameters above, you shouldn’t have much problem making any adjustments.
Line #7: Worksheets(“Example 3 – PasteSpecial”).Columns(“B:CZ”).AutoFit
This line is substantially the same as the last line of code within example #2 above (Copy_to_Range). Its purpose is exactly the same:
This line uses the Range.AutoFit method for purposes of autofitting the column width.
The only difference between this statement and that in example #2 above is the column range to which it is applied. In example #2 (Copy_to_Range) above, the autofitted columns are B to M (Range(“B5:M107”)). In this example #3 (Copy_PasteSpecial), the relevant columns are B to CZ (Columns(“B:CZ”)).
The reason why I make this adjustment is the layout of the data and, more precisely, the fact that the Copy_PasteSpecial macro transposes the rows and columns. This results in the table extending further horizontally.
The following screenshot shows the results of executing the Copy_PasteSpecial macro. Notice, among others, how (i) no borders have been pasted (a consequence of setting the Paste parameter to xlPasteValuesAndNumberFormats), and (ii) the rows and columns are transposed (a consequence of setting Transpose to equal True).
If you only need to copy values (the equivalent of setting the Paste parameter to xlPasteValues) or formulas (the equivalent of setting the Paste parameter to xlPasteFormulas), you may prefer to set the values or the formulas of the destination cells to be equal to that of the source cells instead of using the Range.Copy and Range.PasteSpecial methods. I explain how you can do this (alongside an example) below.
As you can see, you can use the PasteSpecial method to replicate all of the options that appear in the Paste Special dialog box, except for the Paste Link button that appears on the lower left corner of the dialog.
Let’s take a look at a VBA method you can use for these purposes:
Excel VBA Copy Paste With The Worksheet.Paste Method
The Worksheet.Paste VBA method (Excel VBA has no Range.Paste method) is, to a certain extent, very similar to the Range.PasteSpecial method that I explain in the previous section. The main purpose of the Paste method is to paste the contents contained by the Clipboard on the relevant worksheet.
However, as the following section makes clear, there are some important differences between both methods, both in terms of syntax and functionality. Let’s take a look at this:
Worksheet.Paste VBA Method: Syntax And Parameters
The basic syntax of the Worksheet.Paste method is:
expression.Paste(Destination, Link)
The first difference between this method and the others that I explain in previous sections is that, in this particular case, “expression” stands for a Worksheet object. In other cases we’ve seen in this Excel tutorial (such as the Range.PasteSpecial method), “expression” is a variable representing a Range object.
The Paste method has the following 2 optional parameters. They have some slightly particular conditions which differ from what we’ve seen previously in this same blog post.
- Destination: Destination is a Range object where the contents of the Clipboard are to be pasted.
- Since the Destination parameter is optional, you can omit it. If you omit Destination, Excel pastes the contents of the Clipboard in the current selection. Therefore, if you omit the argument, you must select the destination range before using the Worksheet.Paste method.
- You can only use the Destination argument if 2 conditions are met: (i) the contents of the Clipboard can be pasted into a range, and (ii) you’re not using the Link parameter.
- Link: You use the Link parameter for purposes of establishing a link to the source of the pasted data. To do this, you set the value to True. The default value of the parameter is False, meaning that no link to the source data is established.
- If you’re using the Destination parameter when working with the Worksheet.Paste method, you can’t use the Link parameter. Macro example #5 below shows how one way in which you can specify the destination for pasting links.
Let’s take a look at 2 examples that show the Worksheet.Paste method working in practice:
Macro Example #4: Copy And Paste
The following sample macro (named “Copy_Paste”) works with exactly the same data as the previous examples. It shows how you can use the Worksheet.Paste method for purposes of copying and pasting data.
Just as with the previous example macro #3, since this particular macro uses the Clipboard, you can add the statement “Application.CutCopyMode = False” at the end of the macro for purposes of cancelling the Cut or Copy mode. I explain this statement in more detail below.
Let’s take a look at each of the lines of code to understand how this sample macro proceeds:
Line #1: Worksheets(“Sample Data”).Range(“B5:M107”).Copy
This statement is the same as the first statement of all the other sample macros that I’ve introduced in this blog post. I explain its different items the first time is used.
Its purpose is to copy the contents within cells B5 to M107 of the “Sample Data” worksheet to the Clipboard.
Lines #2 And #3: Worksheets(“Example 4 – Paste”).Paste Destination:=Worksheets(“Example 4 – Paste”).Range(“B5:M107”)
This statement uses the Worksheet.Paste method for purposes of pasting the contents of the Clipboard (determined by line #1 above) in the destination range of cells.
To be more precise, let’s break down the statement into the following 3 items:
- Item #1: “Worksheets(“Example 4 – Paste”)”.
- This item represents the worksheet named “Example 4 – Paste”. Within the basic syntax of the Worksheet.Paste method that I explain above, this is the expression variable representing a Worksheet object.
- You can easily modify this object reference by, for example, qualifying it as I introduce above. This allows you to, for example, paste the items that are in the Clipboard in a different workbook.
- Item #2: “Paste”.
- This is the Paste method.
- Item #3: “Destination:=Worksheets(“Example 4 – Paste”).Range(“B5:M107″)”.
- The last item within the statement we’re looking at is the Destination parameter of the Worksheet.Paste method. In this particular case, the destination is the range of cells B5 to M107 within the worksheet named “Example 4 – Paste”.
Line #4: Worksheets(“Example 4 – Paste”).Columns(“B:M”).AutoFit
This is an additional line that I’ve added to most of the sample macros within this Excel tutorial for presentation purposes. Its purpose is to autofit the width of the columns within the destination range.
I explain this statement it in more detail above.
The end result of executing the sample macro above (Copy_Paste) is as follows:
These results are substantially the same as those obtained when executing the macro in example #2 above (Copy_to_Range), which only used the Range.Copy method with a Destination parameter. Therefore, you may not find this particular application of the Worksheet.Paste method particularly interesting.
In fact, in such cases, you’re probably better off by using the Range.Copy method with a Destination parameter instead of using the Worksheet.Paste method (as in this example). The main reason for this is that the Range.Copy method is more efficient and faster.
The Worksheet.Paste method pastes the Clipboard contents to a worksheet. You must (therefore) carry out a 2-step process (to copy and paste a cell range):
- Copy a cell range’s contents to the Clipboard.
- Paste the Clipboard’s contents to a worksheet.
If you use the macro recorder for purposes of creating a macro that copies and pastes a range of cells, the recorded code generally uses the Worksheet.Paste method. Recorded code (usually) follows a 3-step process:
- Copy a cell range’s contents to the Clipboard.
- Select the destination cell range.
- Paste the Clipboard’s contents to the selected (destination) cell range.
You can (usually) achieve the same result in a single step by working with the Range.Copy method and its Destination parameter. As a general rule, directly copying to the destination cell range (by using the Range.Copy method with a Destination parameter) is more efficient than both of the following:
- Copying to the Clipboard and pasting from the Clipboard.
- Copying to the Clipboard, selecting the destination cell range, and pasting from the Clipboard.
I provide further reasons why, when possible, you should try to avoid copying to the Clipboard near the beginning of this blog post when answering the question of whether, when working with the Range.Copy method, you should copy to the Clipboard or a Destination. Overall, there seems to be little controversy around the suggestion that (when possible) you should avoid the multi-step process of copying and pasting.
The next example uses the Worksheet.Paste method again, but for purposes of setting up links to the source data.
Macro Example #5: Copy And Paste Links
The following sample macro (Copy_Paste_Link) uses, once more, the Worksheet.Paste method that appears in the previous example. The purpose of using this method is, however, different.
More precisely, this sample macro #5 uses the Worksheet.Paste method for purposes of pasting links to the source data.
As with the other macro examples within this tutorial that use the Clipboard, you may want to use the Application.CutCopyMode property for purposes of cancelling Cut or Copy mode. To do this, add the statement “Application.CutCopyMode = False” at the end of the Sub procedure. I explain this particular topic below.
Let’s take a closer look at each of the lines of code to understand the structure of this macro, which differs from others we’ve previously seen in this Excel tutorial.
Line #1: Worksheets(“Sample Data”).Range(“B5:M107”).Copy
This statement, used in all of the previous sample macros and explained above, copies the range of cells B5 to M107 within the “Sample Data” worksheet to the Clipboard.
Line #2: Worksheets(“Example 4 – Paste”).Activate
This statement uses the Worksheet.Activate method. The main purpose of the Worksheet.Activate VBA method is to activate the relevant worksheet. As explained in the Microsoft Dev Center, it’s “the equivalent to clicking the sheet’s tab”.
The basic syntax of the Worksheet.Activate method is:
expression.Activate[/code]
“expression” is a variable representing a Worksheet object. In this particular macro example, “expression” is “Worksheets(“Example 5 – Paste Link”)”.
You can also activate a worksheet in a different workbook by qualifying the object reference, as I introduce above.
Line #3: ActiveSheet.Range(“B5”).Select
This particular statement uses the Range.Select VBA method. The purpose of this method is to select the relevant range.
The syntax of the Range.Select method is:
expression.Select
In this particular case, “expression” is a variable representing a Range object. In the example we’re looking at, this expression is “ActiveSheet.Range(“B5″)”.
The first item within this expression (“ActiveSheet”) is the Application.ActiveSheet property. This property returns the active sheet in the active workbook. The second item (“Range (“B5″)”) makes reference to cell B5.
As a consequence of the above, this statement selects cell B5 of the “Example 5 – Paste Link” worksheet. This worksheet was activated by the previous line of code.
Lines #4 And #5: ActiveSheet.Paste Link:=True
The use of the Worksheet.Activate method in line #2 and the Range.Select method in line #3 is an important difference between this macro sample #5 and the previous sample macros we’ve seen in this tutorial.
The reason why this particular Sub procedure (Copy_Paste_Link) uses the Worksheet.Activate and Range.Select method is that you can’t use the Destination parameter of the Paste method when using the Link parameter. In the absence of the Destination parameter, the Worksheet.Paste method pastes the contents of the Clipboard on the current selection. That current selection is (in this case) determined by the Worksheet.Activate and Range.Select methods as shown above.
In other words, since cell B5 of the “Example 5 – Paste Link” worksheet is the current selection, this is where the items within the Clipboard are pasted.
This particular statement uses the Worksheet.Paste method alongside with its Link parameter for purposes of only pasting links to the data sources. This is done by setting the Link parameter to True.
Line #5: Worksheets(“Example 5 – Paste Link”).Columns(“B:M”).AutoFit
This line isn’t absolutely necessary for purposes of copying and pasting links. I include it, mainly, for purposes of improving the readability of the destination worksheet (Example 5 – Paste Link).
Since this line repeats itself in other sample macros within this blog post, I explain it in more detail above. For purposes of this section, is enough to know that its purpose is to autofit the width of the destination columns (B through M) of the worksheet where the links are pasted (Example 5 – Paste Link).
The following image shows the results of executing the sample Copy_Paste_Link macro. Notice the effects this has in comparison with other methods used by previous sample macros. In particular, notice how (i) no borders or number formatting has been pasted, and (ii) cells that are blank in the source range result in a 0 being displayed when the link is established.
Excel VBA Copy Paste With The Range.CopyPicture Method
As anticipated above, the Range.CopyPicture VBA method allows you to copy a Range object as a picture.
The object is always copied to the Clipboard. In other words, there’s no Destination parameter that allows you to specify the destination of the copied range.
Range.CopyPicture Method: Syntax And Parameters
The basic syntax of the Range.CopyPicture method is the following:
expression.CopyPicture(Appearance, Format)
“expression” stands for the Range object you want to copy.
The CopyPicture method has 2 optional parameters: Appearance and Format. Notice that these 2 parameters are exactly the same as those that Excel displays in the Copy Picture dialog box.
This Copy Picture dialog box is displayed when you manually execute the Copy as Picture command.
The purpose and values that each of the parameters (Appearance and Format) can take within Visual Basic for Applications reflect the Copy Picture dialog box. Let’s take a look at what this means more precisely:
The Appearance parameter specifies how the copied range is actually copied as a picture. Within VBA, you specify this by using the appropriate value from the XlPictureAppearance enumeration. More precisely:
- xlScreen (or 1) means that the appearance should resemble that displayed on screen as close as possible.
- xlPrinter (or 2) means that the picture is copied as it is shown when printed.
The Format parameter allows you to specify the format of the picture. The enumeration you use to specify the formats is the XlCopyPictureFormat enumeration, which is as follows:
- xlBitmap (or 2) stands for bitmap (.bmp, .jpg or .gif formats).
- xlPicture (or -4147) represents drawn picture (.png, .wmf or .mix) formats.
Let’s take a look at an example which uses the Range.CopyPicture VBA method in practice:
Macro Example #6: Copy As Picture
The following Sub procedure (Copy_Picture) works with the same source data as all of the previous examples. However, in this particular case, the data is copied as a picture thanks to the Range.CopyPicture method.
Let’s go through each of the lines of code separately to understand how the macro works:
Lines #1 To #3: Worksheets(“Sample Data”).Range(“B5:M107”).CopyPicture Appearance:=xlScreen, Format:=xlPicture
Lines #1 through #3 use the Range.CopyPicture VBA method for purposes of copying the relevant range of cells as a picture.
Notice how, this line of code is very similar to, but not the same as, the opening statements in all of the previous sample macros. The reason for this is that, this particular macro example #6 uses the Range.CopyPicture method instead of the Range.Copy method used by the previous macro samples.
Let’s break this statement in the following 4 items in order to understand better how it works and how it differs from the previous macro examples:
- Item #1: “Worksheets(“Sample Data”).Range(“B5:M107″)”.
- This item uses the Worksheet.Range property for purposes of returning the range object that is copied as a picture. More precisely, this Range object that is copied as a picture is made up of cells B5 to 107 within the “Sample Data” worksheet.
- Item #2: “CopyPicture”.
- This makes reference to the Range.CopyPicture method that we’re analyzing.
- Item #3: “Appearance:=xlScreen”.
- This item is the Appearance property of the Range.CopyPicture method. You can use this for purposes of specifying how the copied range is copied as a picture. In this particular case, Excel copies the range in such a way that it resembles how it’s displayed on the screen (as much as possible).
- Item #4: “Format:=xlPicture”.
- This is the Format property of the CopyPicture method. You can use this property to determine the format of the copied picture. In this particular example, the value of xlPicture represents drawn picture (.png, .wmf or .mix) formats.
Lines #5 And #6: Worksheets(“Example 6 – Copy Picture”).Paste Destination:=Worksheets(“Example 6 – Copy Picture”).Range(“B5”)
This statement uses the Worksheets.Paste method that I explain above for purposes of pasting the picture copied using the Range.CopyPicture method above. Notice how this statement is very similar to that which I use in macro example #4 above.
In order to understand in more detail how the statement works, let’s break it into the following 3 items:
- Item #1: “Worksheets(“Example 6 – Copy Picture”)”.
- This item uses the Applications.Worksheets VBA property for purposes of returning the worksheet where the picture that’s been copied previously is pasted. In this particular case, that worksheet is “Example 6 – Copy Picture”.
- If you want to paste the picture in a different workbook, you just need to appropriately qualify the object reference as I explain at the beginning of this Excel tutorial.
- Item #2: “Paste”.
- This makes reference to the Worksheet.Paste method.
- Item #3: “Destination:=Worksheets(“Example 6 – Copy Picture”).Range(“B5″)”.
- This is item sets the Destination parameter of the Worksheet.Paste method. This is the destination where the picture within the Clipboard is pasted. In this particular case, this is set by using the Worksheet.Range property to specify cell B5 of the worksheet “Example 6 – Copy Picture”.
The following screenshot shows the results obtained when executing the sample macro #6 (Copy_Picture). Notice how source data is indeed (now) a picture. Check out, for example, the handles that allow you to rotate and resize the image.
Excel VBA Copy Paste With The Range.Value And Range.Formula Properties
These methods don’t, strictly speaking, copy and paste the contents of a cell range. However, you may find them helpful if all you want to do is copy and paste the (i) values or (ii) the formulas of particular source range in another destination range.
In fact, if you’re only copying and pasting values or formulas, you probably should be using this way of carrying out the task with Visual Basic for Applications instead of relying on the Range.PasteSpecial method I introduce above. The main reason for this is performance and speed: This strategy tends to result in faster VBA code (than working with the Range.Copy method).
In order to achieve your purposes of copying and pasting values or formulas using this faster method, you’ll be using the Range.Value VBA property or the Range.Formula property (depending on the case).
- The Range.Value property returns or sets the value of a particular range.
- The Range.Formula property returns or sets the formula in A1-style notation.
The basic syntax of both properties is similar. In the case of the Range.Value property, this is:
expression.Value(RangeValueDataType)
For the Range.Formula property, the syntax is as follows:
expression.Formula
In both cases, “expression” is a variable representing a Range object.
The only optional parameter of the Range.Value property us RangeValueDataType, which specifies the range value data type by using the values within the xlRangeValueDataType enumeration. However, you can understand how to implement the method I describe here for purposes of copying and pasting values from one range to another without focusing too much on this parameter.
Let’s take a look at how you can use these 2 properties for purposes of copying and pasting values and formulas by checking out some practical examples:
Macro Example #7: Set Value Property Of Destination Range
The following macro (Change_Values) sets the values of cells B5 to M107 of the worksheet “Example 7 – Values” to be equal to the values of cells B5 to M107 of the worksheet “Sample Data”.
For this way of copying and pasting values to work, the size of the source and destination ranges must be the same. The macro example above complies with this condition. Alternatively, you may want to check out the adjustment at thespreadsheetguru.com (by following the link above), which helps you guarantee that the 2 ranges are the same size.
Let’s take a closer at the VBA code row-by-row look:
Line #1: Worksheets(“Example 7 – Values”).Range(“B5:M107”).Value = Worksheets(“Sample Data”).Range(“B5:M107”).Value
This statement sets the Value property of a certain range (cells B5 to M107 of the “Example 7 – Values” worksheet) to be equal to the Value property of another range (cells B5 to M107 of the “Sample Data” worksheet).
I explain how you can set and read object properties in detail in this Excel tutorial. In this particular case, this is done as follows:
Line #2: Worksheets(“Example 7 – Values”).Columns(“B:M”).AutoFit
This statement is used several times in previous macro examples. I explain it in more detail above.
Its main purpose is to autofit the width of the columns where the cells whose values are set by the macro (the destination cells) are located. In this particular example, those are columns B to M of the “Example 7 – Values” worksheet.
The following screenshot shows the results I get when executing the Change_Values macro.
The following example, which sets the Formula property of the destination range, is analogous to this one. Let’s take a look at it:
Macro Example #8: Set Formula Property Of Destination Range
As anticipated, the following macro (Change_Formulas) works in a very similar way to the previous example #7. The main difference is that, in this particular case, the purpose of the Sub procedure is to set formulas, instead of values. More precisely, the macro sets the formulas of cells B5 to M107 of the “Example 8 – Formulas” worksheet to be the same as those of cells B5 to M107 of the “Sample Data” worksheet.
The basic structure of this macro is virtually identical to that of the Change_Values Sub procedure that appears in macro example #7 above. Just as in that case, the source and destination ranges must be of the same size.
Let’s take, anyway, a quick look at each of the lines of code to ensure that we understand every detail:
Line #1: Worksheets(“Example 8 – Formulas”).Range(“B5:M107”).Formula = Worksheets(“Sample Data”).Range(“B5:M107”).Formula
This statement sets the Formula property of cells B5 to M107 of the “Example 8 – Formulas” worksheet to be equal to the Formula property of cells B5 to M107 of the “Sample Data” worksheet.
The basic structure of the statement is exactly the same to that in the previous macro example #7, with the difference that (now) we’re using the Range.Formula property instead of the Range.Value property. More precisely:
Line #2: Worksheets(“Example 8 – Formulas”).Columns(“B:M”).AutoFit
The purpose of this statement is to autofit the width of the columns where the cells whose formulas have changed are located.
The following screenshot shows the results obtained when executing this macro:
Notice the following interesting aspects of how the Range.Formula property works:
- When the cell contains a constant, the Formula property returns a constant. This applies, for example, for (i) the columns that hold the number of units sold, and (ii) the unit prices of Items A, B, C, D and E.
- If a cell is empty, Range.Formula returns an empty string. In the example we’re looking at, this explains the result in the blank cells between the row specifying unit prices and the main table.
- Finally, if a cell contains a formula, the Range.Formula property returns the formula as a string, and includes the equal sign (=) at the beginning. In the sample worksheet, this explains the results obtained in the cells containing total sales (per item and the grand total).
How To Cancel Cut or Copy Mode and Remove the Moving Border
Several of the VBA methods and macro examples included in this Excel tutorial use the Clipboard.
If you must (or choose to) use the Clipboard when copying and pasting cells or cell ranges with Visual Basic for Applications, you may want to cancel Cut or Copy mode prior to the end of your macros. This removes the moving border around the copied cell range.
The following screenshot shows how this moving border looks like in the case of the “Sample Data” worksheet that includes the source cell range that I’ve used in all of the macro examples within this blog post. Notice the dotted moving outline around the copied cell range:
The VBA statement you need to cancel Cut or Copy mode and remove the moving outline (that appears above) is as follows:
Application.CutCopyMode = False
This statement simply sets the Application.CutCopyMode VBA property to False. Including this statement at the end of a macro has the following 2 consequences:
- Effect #1: The Cut or Copy mode is cancelled.
- Effect #2: The moving border is removed.
The following image shows the VBA code of macro example #4 above, with this additional final statement for purposes of cancelling Cut or Copy mode.
If I execute this new version of the Copy_Paste sample macro, Excel automatically removes the moving border around the copied cell range in the “Sample Data” worksheet. Notice how, in the following screenshot, the relevant range isn’t surrounded by the moving border:
Excel VBA Copy Paste: Other VBA Methods You May Want To Explore
The focus of this Excel tutorial is in copying and pasting data in ranges of cells.
You may, however, be interested in learning or exploring about other VBA methods that you can use for pasting other objects or achieve different objectives. If that is the case, perhaps one or more of the methods that I list below may be helpful:
- The Chart.CopyPicture method, which pastes the selected chart object as a picture.
- The Chart.Copy method and the Charts.Copy method, whose purpose is to copy chart sheets to another location.
- The Chart.Paste method, which pastes data into a particular chart.
- The ChartArea.Copy VBA method, whose purpose is to copy the chart area of a chart to the Clipboard.
- The ChartObject.Copy method and the ChartObjects.Copy method, which copy embedded charts to the Clipboard.
- The ChartObject.CopyPicture method and the ChartObjects.CopyPicture VBA method, which you can use to copy embedded charts to the Clipboard as a picture.
- The Floor.Paste VBA method, which pastes a picture that is within the Clipboard on the floor of a particular chart.
- The Point.Copy method, which (when a point in a series in a chart has a picture fill), copies the relevant picture to the Clipboard.
- The Point.Paste method, whose purpose is to paste a picture from the Clipboard as the marker of a particular point in a series in a chart.
- The Range.CopyFromRecordset method, which copies the contents of a Data Access Object (DAO) or an ActiveX Data Object (ADO) Recordset object to a worksheet.
- The Series.Copy method, whose purpose is to copy the picture fill of the marker on a series in a chart (if the series has a picture fill).
- The Series.Paste method, which pastes a picture from the Clipboard as the marker on a particular series in a chart.
- The SeriesCollection.Paste VBA method, whose purpose is to paste the data on the Clipboard into a chart series collection.
- The Shape.CopyPicture method, which copies an object to the Clipboard as a picture.
- The Sheets.Copy method, which copies a sheet to another location.
- The Slicer.Copy VBA method, whose purpose is to copy a slicer to the Clipboard.
- The Walls.Paste method, which pastes a picture from the Clipboard on the walls of a chart.
- The Worksheet.Copy method, which you can use to copy a sheet to another location.
- The Worksheet.PasteSpecial VBA method, which pastes the contents that are within the Clipboard on the worksheet using a specified format. This particular method is commonly used for purposes of pasting (i) data from other applications, or (ii) pasting data in a particular format.
This list doesn’t include absolutely all the VBA methods that copy and paste objects. It covers (mostly) the methods that apply to some of the main objects you’re likely to work with on a consistent basis, such as charts and worksheets.
Conclusion
By completing this Excel tutorial, you’ve covered the most important VBA methods that you can use for purposes of copying and pasting cells and cell ranges in Excel. More precisely, you’ve read about:
- The Range.Copy method.
- The Range.PasteSpecial method.
- The Worksheet.Paste method.
- The Range.CopyPicture method.
- The Range.Value and Range.Formula properties, and how you can use them for purposes of copying values and formulas between cells and cell ranges.
You’ve also seen how to use the Application.CutCopyMode property for purposes of cancelling the Cut or Copy mode, if you decide to use it in your copy-pasting macros.
In addition to covering the basics of each method and property, you’ve seen 8 different examples of VBA code that can be easily adjusted to cover other situations you may encounter.
This Excel VBA Copy Paste Tutorial is accompanied by an Excel workbook containing the data and macros I use in the examples above. You can get immediate free access to this workbook by clicking the button below.
Also, remember that you can easily adjust the source and destination cells in any of those macros by adequately qualifying the object references or modifying the range references.
The knowledge and examples you’ve acquired enables you to immediately start creating your own macros for purposes of copying and pasting cells and cell ranges in Excel.
I’m aware that, in some situations, you’ll want to copy and paste other objects (not cell ranges) with VBA. For those purposes, you can refer to the list of similar VBA methods that I’ve not covered in this Excel VBA tutorial.
In this Article
- Paste Values
- Copy and Value Paste to Different Sheet
- Copy and Value Paste Ranges
- Copy and Value Paste Columns
- Copy and Value Paste Rows
- Paste Values and Number Formats
- .Value instead of .Paste
- Cell Value vs. Value2 Property
- Copy Paste Builder
- Paste Special – Formats and Formulas
- Paste Formats
- Paste Formulas
- Paste Formulas and Number Formats
- Paste Special – Transpose and Skip Blanks
- Paste Special – Transpose
- Paste Special – Skip Blanks
- Other Paste Special Options
- Paste Special – Comments
- Paste Special – Validation
- Paste Special – All Using Source Theme
- Paste Special – All Except Borders
- PasteSpecial – Column Widths
- PasteSpecial – All MergingConditionalFormats
This tutorial will show you how to use PasteSpecial in VBA to paste only certain cell properties (exs. values, formats)
In Excel, when you copy and paste a cell you copy and paste all of the cell’s properties: values, formats, formulas, numberformatting, borders, etc:
Instead, you can “Paste Special” to only paste certain cell properties. In Excel, the Paste Special menu can be accessed with the shortcut CTRL + ALT + V (after copying a cell):
Here you can see all the combinations of cell properties that you can paste.
If you record a macro while using the Paste Special Menu, you can simply use the generated code. This is often the easiest way to use VBA to Paste Special.
Paste Values
Paste Values only pastes the cell “value”. If the cell contained a formula, Paste Values will paste the formula result.
This code will Copy & Paste Values for a single cell on the same worksheet:
Range("A1").Copy
Range("B1").PasteSpecial Paste:=xlPasteValues
Copy and Value Paste to Different Sheet
This example will Copy & Paste Values for single cells on different worksheets
Sheets("Sheet1").Range("A1").Copy
Sheets("Sheet2").Range("B1").PasteSpecial Paste:=xlPasteValues
These examples will Copy & Paste Values for a ranges of cells:
Copy and Value Paste Ranges
Range("A1:B3").Copy
Range("C1").PasteSpecial Paste:=xlPasteValues
Copy and Value Paste Columns
Columns("A").Copy
Columns("B").PasteSpecial Paste:=xlPasteValues
Copy and Value Paste Rows
Rows(1).Copy
Rows(2).PasteSpecial Paste:=xlPasteValues
Paste Values and Number Formats
Pasting Values will only paste the cell value. No Formatting is pasted, including Number Formatting.
Often when you Paste Values you will probably want to include the number formatting as well so your values remain formatted. Let’s look at an example.
Here we will value paste a cell containing a percentage:
Sheets("Sheet1").Columns("D").Copy
Sheets("Sheet2").Columns("B").PasteSpecial Paste:=xlPasteValues
Notice how the percentage number formatting is lost and instead a sloppy decimal value is shown.
Instead let’s use Paste Values and Numbers formats:
Sheets("Sheet1").Columns("D").Copy
Sheets("Sheet2").Columns("B").PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Now you can see the number formatting is also pasted over, maintaining the percentage format.
VBA Coding Made Easy
Stop searching for VBA code online. Learn more about AutoMacro — A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!
Learn More
.Value instead of .Paste
Instead of Pasting Values, you could use the Value property of the Range object:
This will set A2’s cell value equal to B2’s cell value
Range("A2").Value = Range("B2").Value
You can also set a range of cells equal to a single cell’s value:
Range("A2:C5").Value = Range("A1").Value
or a range of cells equal to another identically sized range of cells:
Range("B2:D4").Value = Range("A1:C3").Value
It’s less typing to use the Value property. Also, if you want to become proficient with Excel VBA, you should be familiar with working with the Value property of cells.
Cell Value vs. Value2 Property
Technically, it’s better to use the Value2 property of a cell. Value2 is slightly faster (this only matters with extremely large calculations) and the Value property might give you a truncated result of the cell is formatted as currency or a date. However, 99%+ of code that I’ve seen uses .Value and not .Value2. I personally do not use .Value2, but you should be aware that it exists.
Range("A2").Value2 = Range("B2").Value2
Copy Paste Builder
We’ve created a “Copy Paste Code Builder” that makes it easy to generate VBA code to copy (or cut) and paste cells. The builder is part of our VBA Add-in: AutoMacro.
AutoMacro also contains many other Code Generators, an extensive Code Library, and powerful Coding Tools.
VBA Programming | Code Generator does work for you!
Paste Special – Formats and Formulas
Besides Paste Values, the most common Paste Special options are Paste Formats and Paste Formulas
Paste Formats
Paste formats allows you to paste all cell formatting.
Range("A1:A10").Copy
Range("B1:B10").PasteSpecial Paste:=xlPasteFormats
Paste Formulas
Paste formulas will paste only the cell formulas. This is also extremely useful if you want to copy cell formulas, but don’t want to copy cell background colors (or other cell formatting).
Range("A1:A10").Copy
Range("B1:B10").PasteSpecial Paste:=xlPasteFormulas
Paste Formulas and Number Formats
Similar to Paste Values and Number Formats above, you can also copy and paste number formats along with formulas
Here we will copy a cell formula with Accounting Number Formatting and Paste Formulas only.
Sheets("Sheet1").Range("D3").Copy
Sheets("Sheet2").Range("D3").PasteSpecial xlPasteFormulas
Notice how the number formatting is lost and instead a sloppy non-rounded value is shown instead.
Instead let’s use Paste Formulas and Numbers formats:
Sheets("Sheet1").Range("D3").Copy
Sheets("Sheet2").Range("D3").PasteSpecial xlPasteFormulasAndNumberFormats
Now you can see the number formatting is also pasted over, maintaining the Accounting format.
Paste Special – Transpose and Skip Blanks
AutoMacro | Ultimate VBA Add-in | Click for Free Trial!
Paste Special – Transpose
Paste Special Transpose allows you to copy and paste cells changing the orientation from top-bottom to left-right (or vis-a-versa):
Sheets("Sheet1").Range("A1:A5").Copy
Sheets("Sheet1").Range("B1").PasteSpecial Transpose:=True
Paste Special – Skip Blanks
Skip blanks is a paste special option that doesn’t seem to be used as often as it should be. It allows you to copy only non-blank cells when copying and pasting. So blank cells are not copied.
In this example below. We will copy column A, do a regular paste in column B and skip blanks paste in column C. You can see the blank cells were not pasted into column C in the image below.
Sheets("Sheet1").Range("A1:A5").Copy
Sheets("Sheet1").Range("B1").PasteSpecial SkipBlanks:=False
Sheets("Sheet1").Range("C1").PasteSpecial SkipBlanks:=True
Other Paste Special Options
Sheets("Sheet1").Range("A1").Copy Sheets("Sheet1").Range("E1").PasteSpecial xlPasteComments
AutoMacro | Ultimate VBA Add-in | Click for Free Trial!
Paste Special – Validation
Sheets("Sheet1").Range("A1:A4").Copy
Sheets("Sheet1").Range("B1:B4").PasteSpecial xlPasteValidation
Paste Special – All Using Source Theme
Workbooks(1).Sheets("Sheet1").Range("A1:A2").Copy
Workbooks(2).Sheets("Sheet1").Range("A1").PasteSpecial
Workbooks(2).Sheets("Sheet1").Range("B1").PasteSpecial xlPasteAllUsingSourceTheme
Paste Special – All Except Borders
Range("B2:C3").Copy
Range("E2").PasteSpecial
Range("H2").PasteSpecial xlPasteAllExceptBorders
PasteSpecial – Column Widths
A personal favorite of mine. PasteSpecial Column Widths will copy and paste the width of columns.
Range("A1:A2").Copy
Range("C1").PasteSpecial
Range("E1").PasteSpecial xlPasteColumnWidths
PasteSpecial – All MergingConditionalFormats
Range("A1:A4").Copy
Range("C1").PasteSpecial
Range("E1").PasteSpecial xlPasteAllMergingConditionalFormats
Copy paste in VBA is similar to what we do in the Excel worksheet:
- We can copy a value and paste it to another cell.
- We can use Paste Special to paste only the values. Similarly, in VBA, we use the copy method with range property to copy a value from one cell to another.
- We use the worksheet function Paste Special or the paste method to paste the value.
How to Copy Paste in VBA?
Below are some examples of how to copy-paste in Excel using VBA.
The basic thing we do in Excel is copy, cut, and paste the data from one cell to another. It requires no special introduction as well. However, learning VBA coding is important to understand the same concept in coding language. Copy paste in VBA is the routine task we do daily in Excel. To copy first, we need to decide which cell to copy.
Table of contents
- How to Copy Paste in VBA?
- Example #1 – Copy and Paste Values Using Range Object
- Example #2 – Copy to another Worksheet in the Same Workbook
- Example #3 – Copy from One Workbook to another Workbook
- Alternative Way for using Copy-Paste in VBA
- Top Ways of VBA Copy and Paste as Values
- Recommended Articles
You are free to use this image on your website, templates, etc, Please provide us with an attribution linkArticle Link to be Hyperlinked
For eg:
Source: Copy Paste in VBA (wallstreetmojo.com)
Example #1 – Copy and Paste Values Using Range Object
You can download this VBA Copy Paste Excel Template here – VBA Copy Paste Excel Template
Assume you have the word “Excel VBA” in cell A1.
For example, if you want to copy cell A1, we can use the VBA RANGE objectRange is a property in VBA that helps specify a particular cell, a range of cells, a row, a column, or a three-dimensional range. In the context of the Excel worksheet, the VBA range object includes a single cell or multiple cells spread across various rows and columns.read more.
Code:
Sub Copy_Example() Range ("A1"). End Sub
We can see all its properties and methods when you reference the cellCell reference in excel is referring the other cells to a cell to use its values or properties. For instance, if we have data in cell A2 and want to use that in cell A1, use =A2 in cell A1, and this will copy the A2 value in A1.read more. So, select the method “Copy.”
Code:
Sub Copy_Example() Range("A1").Copy End Sub
After selecting the method, press the “Spacebar” key to see the argument of the copy method.
It shows “Destination.”
It is nothing, but where do you want to copy-paste values in VBA without selecting the PASTE method.
If we are pasting in the same sheet, we can select the cell using the Range object. For example, let us say if we want to paste the value in the B3 cell, we can put the destination as “Range(“B3″).”
Code:
Sub Copy_Example() Range("A1").Copy Destination:=Range("B3") End Sub
It will copy the data from cell A1 and paste it into cell B3.
We can also use the below method to paste the data.
Code:
Sub Copy_Example() Range("A1").Copy Range("B3").Select ActiveSheet.Paste End Sub
First, we will copy and select the data from cell A1 and paste it into cell B3.
Example #2 – Copy to another Worksheet in the Same Workbook
Suppose we want to copy-paste the value from the different worksheets using VBA macro, then in the Destination argument. In that case, we need to reference the sheet name using the WORKSHEETS object and then mention the range of cells in that WORKSHEET. The below code will do the job.
Code:
Sub Copy_Example() Range("A1").Copy Destination:=Worksheets("Sheet2").Range("B3") End Sub
If we want to copy the data from a specific sheet and paste it into another separate sheet, we need to mention both the names of the sheets.
Firstly, we need to mention the copying sheet.
Worksheets("Sheet1").Range("A1").Copy
Then, in the “Destination argument,” we need to mention the targeted worksheet name and range of the cell.
Destination:=Worksheets("Sheet2").Range("B3")
So, the code should be like this.
Code:
Sub Copy_Example() Worksheets("Sheet1").Range("A1").Copy Destination:=Worksheets("Sheet2").Range("B3") End Sub
Example #3 – Copy from One Workbook to another Workbook
We have seen how to copy from one worksheet to another worksheet in the same workbook. But, we can also do this from one workbook to another workbook.
Take a look at the below code.
Code:
SubCopy_Example() Workbooks("Book 1.xlsx").Worksheets("Sheet1").Range("A1").Copy Workbooks("Book 2.xlsx").Activate ActiveWorkbook.Worksheets("Sheet 2").Select ActiveSheet.Paste End Sub
Firstly, it will copy the data from the worksheet “Sheet1” in the workbook “Book1.xlsx” from cell A1.
“Workbooks("Book 1.xlsx").Worksheets("Sheet1").Range("A1").Copy”
Then it will activate the workbook “Book 2.xlsx”.
Workbooks("Book 2.xlsx").Activate
The active workbook will select the worksheet “Sheet 2.”
ActiveWorkbook.Worksheets("Sheet 2").Select
Now in the active sheet, it will paste.
ActiveSheet.Paste
Alternative Way for using Copy-Paste in VBA
We have one more alternative way of having the data from one cell to another cell. Assume you have the word “Excel VBA” in cell A1 and you need the same to come in cell B3.
One method we have seen is using the VBA copy and paste method. Now, we will show you one of the alternative ways. Look at the below piece of code to understand.
Code:
Sub Copy_Example1() Range("A1").Value = Range("B3").Value End Sub
The above says whatever the value is there in cell A1 should be equal to the value in cell B3.
Range("A1").Value = Range("B3").Value
Even though this is not a copy and paste method still adds more value to our coding knowledge.
Top Ways of VBA Copy and Paste as Values
Now, we will see different ways of VBA copy and paste values. Assume you are in cell A1 as shown in the below image.
- If we want to copy and paste, we need to reference the cell here. Rather, we can use the property of the Selection.Copy method.
Code:
Sub Copy_Example1() Selection.Copy Destination:=Range("B3") End Sub
OR
Sub Copy_Example1() ActiveCell.Copy Destination:=Range("B3") End Sub
- If you want to copy the entire used range of the worksheet, you can use the below code.
Code:
Sub Copy_Example2() Worksheets("Sheet1").UsedRange.Copy Destination:=Worksheets("Sheet2").Range("A1") End Sub
It will copy the entire used range in the worksheet “Sheet1” and paste it into the worksheet “Sheet2.”
Recommended Articles
This article has been a guide to VBA Copy Paste. Here, we discuss the top ways to copy and paste in VBA, examples, and a downloadable Excel template. Below are some useful Excel articles related to VBA: –
- Copy Formatting in Excel
- Excel VBA Paste Values
- Excel VBA File Copy Function
- Excel VBA Paste
Вырезание, перемещение, копирование и вставка ячеек (диапазонов) в VBA Excel. Методы Cut, Copy и PasteSpecial объекта Range, метод Paste объекта Worksheet.
Метод Range.Cut
Range.Cut – это метод, который вырезает объект Range (диапазон ячеек) в буфер обмена или перемещает его в указанное место на рабочем листе.
Синтаксис
Параметры
Параметры | Описание |
---|---|
Destination | Необязательный параметр. Диапазон ячеек рабочего листа, в который будет вставлен (перемещен) вырезанный объект Range (достаточно указать верхнюю левую ячейку диапазона). Если этот параметр опущен, объект вырезается в буфер обмена. |
Для вставки на рабочий лист диапазона ячеек, вырезанного в буфер обмена методом Range.Cut, следует использовать метод Worksheet.Paste.
Метод Range.Copy
Range.Copy – это метод, который копирует объект Range (диапазон ячеек) в буфер обмена или в указанное место на рабочем листе.
Синтаксис
Параметры
Параметры | Описание |
---|---|
Destination | Необязательный параметр. Диапазон ячеек рабочего листа, в который будет вставлен скопированный объект Range (достаточно указать верхнюю левую ячейку диапазона). Если этот параметр опущен, объект копируется в буфер обмена. |
Метод Worksheet.Paste
Worksheet.Paste – это метод, который вставляет содержимое буфера обмена на рабочий лист.
Синтаксис
Worksheet.Paste (Destination, Link) |
Метод Worksheet.Paste работает как с диапазонами ячеек, вырезанными в буфер обмена методом Range.Cut, так и скопированными в буфер обмена методом Range.Copy.
Параметры
Параметры | Описание |
---|---|
Destination | Необязательный параметр. Диапазон (ячейка), указывающий место вставки содержимого буфера обмена. Если этот параметр не указан, используется текущий выделенный объект. |
Link | Необязательный параметр. Булево значение, которое указывает, устанавливать ли ссылку на источник вставленных данных: True – устанавливать, False – не устанавливать (значение по умолчанию). |
В выражении с методом Worksheet.Paste можно указать только один из параметров: или Destination, или Link.
Для вставки из буфера обмена отдельных компонентов скопированных ячеек (значения, форматы, примечания и т.д.), а также для проведения транспонирования и вычислений, используйте метод Range.PasteSpecial (специальная вставка).
Примеры
Вырезание и вставка диапазона одной строкой (перемещение):
Range(«A1:C3»).Cut Range(«E1») |
Вырезание ячеек в буфер обмена и вставка методом ActiveSheet.Paste:
Range(«A1:C3»).Cut ActiveSheet.Paste Range(«E1») |
Копирование и вставка диапазона одной строкой:
Range(«A18:C20»).Copy Range(«E18») |
Копирование ячеек в буфер обмена и вставка методом ActiveSheet.Paste:
Range(«A18:C20»).Copy ActiveSheet.Paste Range(«E18») |
Копирование одной ячейки и вставка ее данных во все ячейки заданного диапазона:
Range(«A1»).Copy Range(«B1:D10») |
1. Worksheet — Copy and Paste
1.0 The worksheet copy and paste sequence
In Excel, to copy and paste a range:
- Select the source range
- Copy the Selection to the Clipboard. , or Ctrl + C shortcut
- Activate the target Worksheet
- Select the upper left cell of target range
- Paste from the Clipboard to the target range. , or Ctrl + V shortcut
In VBA, this is equivalent to:
Code 0a: Snippet Selection.Copy ActiveSheet.Paste
using the Copy method, and Paste method
Range("Sheet1!A2:A10").Select Selection.Copy Range("Sheet2!B2").Select ActiveSheet.Paste
If instead, the user attempts to only use the Range objects directly, then the following code will return an error (Run-time error ‘438’, Object doesn’t support this property of method’) on the second statement.
Range("Sheet1!A2:A10").Copy Range("Sheet2!B2").Paste ' <-- Returns Run-time error '438'
While Copy is a Method of the Range object, the Paste item is not. The VBE Object Browser lists only the following objects: Chart, Floor, Point, Series, SeriesCollection, Walls and Worksheet as having a member Paste method. Instead, the Range.PasteSpecial method is available as shown in the next section.
1.1 Workbook setup
Code 0b: Macro to Setup
the structure for the examples in this module
Sub SetUp() Dim i As Integer Worksheets("Sheet1").Activate Names.Add Name:="Source", RefersTo:="=$A$2:$A$10" For i = 0 To 8 Range("A2").Offset(i, 0) = 100 * (i + 1) Range("A2").Offset(i, 1) = 10 * (i + 1) Next i Worksheets("Sheet2").Activate Names.Add Name:="Target", RefersTo:="=$B$2" End Sub
2. Worksheet — Copy and PasteSpecial (single column)
2.1 PasteSpecial version 2a
The Copy PasteSpecial methods are often used in the body of a loop. The user looping through each item in an Excel array, and copying certain items to another location.
Code 2a: Macro CopyPaste
using the PasteSpecial method (defaults omitted)
Sub CopyPaste() Dim Src As Range Dim Tgt As Range Dim i As Integer Set Src = Range("Source").Range("A1") ' Home cell of Source Set Tgt = Range("Target") Application.ScreenUpdating = False ' More code statements here For i = 0 To Range("Source").Rows.Count If True Then Src.Offset(i, 0).Copy: Tgt.Offset(i, 0).PasteSpecial End If Next i Application.ScreenUpdating = True End Sub
Code 2a by line number:
- Line 6: assigns the top left cell of the Source range to the Src range object. This is equivalent to:
-
Set Src = WorksheetFunction.Index(Range("Source"), 1, 1) ' Home cell of Source
- Line 13: uses the colon (:) statement separation character, where two statements are combined. This is equivalent to:
-
Src.Offset(i, 0).Copy Tgt.Offset(i, 0).PasteSpecial
The syntax for the PasteSpecial method, including optional arguments is:
VBA function / property | Syntax |
---|---|
expression.PasteSpecial (method) | .PasteSpecial(Paste, Operation, SkipBlanks, Transpose) |
Arguments | Description |
---|---|
Paste Optional | XlPasteType Name (Value) xlPasteAll (-404) xlPasteAllExceptBorders (7) xlPasteAllMergingConditionalFormats (14) xlPasteAllUsingSourceTheme (13) xlPasteColumnWidths (8) xlPasteComments (-4144) xlPasteFormats (-4122) xlPasteFormulas (-4123) xlPasteFormulasAndNumberFormats (11) xlPasteValidation (6) xlPasteValues (-4163) xlPasteValuesAndNumberFormats (12) |
Operation Optional | XlPasteSpecialOperation Name (Value) xlNone (-4142). From constants enumeration. xlPasteSpecialOperationAdd (2) xlPasteSpecialOperationDivide (5) xlPasteSpecialOperationMultiply (4) xlPasteSpecialOperationNone (-4142) xlPasteSpecialOperationSubtract (3) |
SkipBlanks Optional | Variant: True or False |
Transpose Optional | Variant: True or False |
2.2 PasteSpecial version 2b
Code 2b includes the default values for optional arguments to the PasteSpecial method.
Code 2b: Macro CopyPaste2
using the PasteSpecial method with explicit (default) parameters
Sub CopyPaste2() Dim i As Integer Application.ScreenUpdating = False For i = 0 To Range("Source").Rows.Count Range("Source").Range("A1").Offset(i, 0).Copy Range("Target").Offset(i, 0).PasteSpecial Paste:=xlPasteAll, _ Operation:=xlNone, _ SkipBlanks:=False, _ Transpose:=False Next i Application.ScreenUpdating = True End Sub
Code 2b by line number:
- Line 27: uses the PasteSpecial method with explicit arguments by name. Lines 27 to 30 are equivalent to:
-
Range("Target").Offset(i, 0).PasteSpecial xlPasteValues, xlNone, False, False
- with arguments shown by position
The corresponding Paste Special dialog box, with default arguments, is shown in figure 1.
3. Copy & Paste — Copy method with Destination argument
Instead of using the Copy, and PasteSpecial combination, the Copy method can be used with an optional destination argument. Code 3 line 50.
Code 3: Macro CopyPaste4
with Copy destination argument by name
Sub CopyPaste4() Dim Src As Range Dim Tgt As Range Dim i As Integer Set Src = Range("Source").Range("A1") ' Home cell of Source Set Tgt = Range("Target") Application.ScreenUpdating = False For i = 0 To Range("Source").Rows.Count Src.Offset(i, 0).Copy Destination:=Tgt.Offset(i, 0) Next i Application.ScreenUpdating = True End Sub
- Code 3 Line 50 is equivalent to:
-
Src.Offset(i, 0).Copy Tgt.Offset(i, 0)
- with arguments shown by position
The syntax for the Copy method, including optional arguments is:
VBA function / property | Syntax |
---|---|
expression.Copy (method) | .Copy(Destination) |
Arguments | Description |
---|---|
Destination Optional | Specifies the new range for the target. If blank, the source is copied to the Clipboard |
4. Copy & Paste — using value assignment (multi column)
A fourth option is to use an assignment statement. To assign a to b, the syntax is b = a. See Code 4 line 71.
Code 4: Macro AssignSrc2Tgt2cols
assign 2-D Source to 2-D Target
Sub AssignSrc2Tgt2cols() Dim Src As Range Dim Tgt As Range Dim i As Integer, j As Integer Set Src = Range("Source").Range("A1") ' Home cell of Source Set Tgt = Range("Target") Application.ScreenUpdating = False For i = 0 To Range("Source").Rows.Count For j = 0 To 1 Tgt.Offset(i, j).Value = Src.Offset(i, j).Value Next j Next i Application.ScreenUpdating = True End Sub
5. Maintenance — clear target
Code 5: Macro Clear
clears the contents of the target range (one column)
Sub ClearPaste() Dim i As Integer i = Range("Target").CurrentRegion.Rows.Count Range("Target").Resize(i, 1).ClearContents End Sub
- This example was developed in Excel 2016 Pro 64 bit.
- Published: 15 October 2016
- Revised: Friday 24th of February 2023 — 10:37 PM, Pacific Time (PT)
Copy method
The syntax of the Copy method is: Copy([Destination]).
This copies all the contents of the source, including any formulas, comments, and formatting.
If the source range is fixed, this can be used:
Range(“A4:E10”).Copy Range(“J4”).
This copies all the cells in the source range, A4:E10 and pastes it starting at cell J4.
To create a variable resized range that copies over any new rows added to the source, the CurrentRegion property is used.
Range(“A4”).CurrentRegion.Copy Range(“J4”)
PasteSpecial method
This is used to only copy the values, excluding the formatting, comments, and formulas.
The options for the PasteSpecial method can be shown after pressing SPACE after the PasteSpecial method.
- Paste values
Range(“A4”).CurrentRegion.Copy
Range(“J20”).PasteSpecial xlPasteValues
- Paste comments
Range(“J20”).PasteSpecial xlPasteComments
- Paste values and number formats
Range(“J20”).PasteSpecial xlPasteValuesAndNumberFormats
TIP: To duplicate a row of code, highlight the row, hold down the CTRL button and drag the row over to where you want the duplicate row to be.
Resize property
This is helpful when copying a region excluding the headers.
The region can be offset one row down using the Offset property.
Range(“A4”).CurrentRegion.Offset(1,0)
This row will appear red initially since the formula is incomplete at this point.
To verify that the address is correct, test it in the Immediate Window:
?Range(“A4”).CurrentRegion.Offset(1,0).Address
Pressing ENTER will give the address of the new source after the offset has been done.
If having the extra row is an issue, an additional formula is used to exclude it using the resize property.
To use this: Resize([RowSize], [ColumnSize]).
Since the RowSize will be the actual number of rows excluding the header, we will count the region and deduct 1.
This allows it to be dynamic when additional rows are added.
Resize(Range(“A4”).CurrentRegion.Rows.Count-1)
Merging these into one becomes:
Range(“A4”).CurrentRegion.Offset(1,0).Resize(Range(“A4”).CurrentRegion.Rows.Count-1)
This can again be tested in the Immediate Window:
?Range(“A4”).CurrentRegion.Offset(1,0).Resize(Range(“A4”).CurrentRegion.Rows.Count-1).Address
Pressing ENTER will show that it now excludes the blank row after the current region.
The Copy method is then added.
Since the formula row is too long, this can also be broken down into two rows by using the _ separator:
Range(“A4”).CurrentRegion.Offset(1,0)._
Resize(Range(“A4”).CurrentRegion.Rows.Count-1).Copy
Range(“A20”).PasteSpecial xlPasteValuesAndNumberFormats
The dotted copy lines will be seen on the spreadsheet as if manually copying a cell.
To remove this, use:
Application.CutCopyMode = False.
The destination where the Paste action was done last will be highlighted gray.
To remove this, jump to another cell by using:
Range(“A1”).Select.
This makes cell A1 as the active cell as the final action.
Summary
Feel free to Download the Workbook HERE.
Published on: April 19, 2018
Last modified: February 23, 2023
Leila Gharani
I’m a 5x Microsoft MVP with over 15 years of experience implementing and professionals on Management Information Systems of different sizes and nature.
My background is Masters in Economics, Economist, Consultant, Oracle HFM Accounting Systems Expert, SAP BW Project Manager. My passion is teaching, experimenting and sharing. I am also addicted to learning and enjoy taking online courses on a variety of topics.
VBA Copy Paste
Similar to worksheet function in excel, we can also copy paste data or set of values in VBA. In normal data, we use either CTRL + C to copy a selection of data and then use CTRL + V to paste the selected data in the target cell. But the same in VBA is done by certain codes which we will learn in this article.
How do we use copy and paste in Excel VBA? To do this first we need to activate the target worksheet or workbook from where we want to copy any range of data and that selection is copied by a certain code, when that selection is successfully copied we can go ahead and paste the data in the target cell range.
The syntax to copy the data in VBA is as follows:
Range ( “ Original Cell “).Copy
Now the syntax to paste the data in other worksheet or any other cell range is as follows:
Range ( “ Destination Cell “ ).Paste
We use Dot (.) operator to use the copy and paste methods in VBA.
We can copy an entire column and paste it to another column and similarly we can also copy an entire row and paste it to another row. We will learn all these things in this article.
Note: In order to use VBA in excel ensure that Developer’s Tab is enabled from File’s Tab then to the options settings section.
How to Use Excel VBA Copy Paste?
We will learn how to use VBA Copy Paste with few examples in Excel.
You can download this VBA Copy Paste Excel Template here – VBA Copy Paste Excel Template
VBA Copy Paste – Example #1
For demonstration purpose, I have a random value in cell A1 which I want to copy and paste it to cell B1 Using VBA Code. Have a look below what the data is in cell A1 and cell B1 is blank.
Follow the below steps to use Excel VBA Copy Paste:
Step 1: Go to developer’s tab and click on Visual Basic to open VB Editor.
Step 2: Once the VB Editor opens up, click on insert and then click on Insert module to insert a code window.
Step 3: Declare a sub-function to start writing the code.
Code:
Sub Sample() End Sub
Step 4: Activate the worksheet first in order to use the properties of the worksheet by the following code.
Code:
Sub Sample() Worksheets("Sheet1").Activate End Sub
Step 5: Copy the data which is in cell A1 by the following code.
Code:
Sub Sample() Worksheets("Sheet1").Activate Range("A1").Copy End Sub
Step 6: Now paste the copied data in the target cell which is cell B1 by the following code.
Code:
Sub Sample() Worksheets("Sheet1").Activate Range("A1").Copy Range("B1").PasteSpecial End Sub
Step 7: Run the above code from the run button provided and see the result in cell B1.
VBA Copy Paste – Example #2
I have data in column C and I want to copy the entire data or values and paste it to in column D using VBA code. Have a look below what is the data in Column C and that Column D is empty.
Follow the below steps to use Excel VBA Copy Paste:
Step 1: Go to developer’s tab and click on Visual Basic to open VB Editor.
Step 2: Click on the module inserted to open up the code window,
Step 3: Declare a sub-function to start writing the code.
Code:
Sub Sample1() End Sub
Step 4: Activate the worksheet first with the following code.
Code:
Sub Sample1() Worksheets("Sheet1").Activate End Sub
Step 5: Copy the data in column C by the following code.
Code:
Sub Sample1() Worksheets("Sheet1").Activate Range("C:C").Copy End Sub
Step 6: Now to paste the data in column D use the following code.
Code:
Sub Sample1() Worksheets("Sheet1").Activate Range("C:C").Copy Range("D:D").PasteSpecial End Sub
Step 7: Run the following code from the run button provided or press F5.
Run the code to see the following result.
VBA Copy Paste – Example #3
Now for this example, I have a whole bunch of range of Data in cell range G1:H3 and I want to copy the data in the cell range I1:J3. Have a look below at the data I have in the cell range G1:H3 and the cell range I1:J3 is blank.
Follow the below steps to use Excel VBA Copy Paste:
Step 1: Go to developer’s tab and click on Visual Basic to open VB Editor.
Step 2: Click on the module inserted to open up the code window,
Step 3: Declare a sub-function to start writing the code.
Code:
Sub Sample2() End Sub
Step 4: Activate the worksheet first to use its properties by the following code.
Code:
Sub Sample2() Worksheets("Sheet1").Activate End Sub
Step 5: Copy the data in the target cell range with the following code.
Code:
Sub Sample2() Worksheets("Sheet1").Activate Range("G1:H3").Copy End Sub
Step 6: Now to paste the data in the destination cell use the following code.
Code:
Sub Sample2() Worksheets("Sheet1").Activate Range("G1:H3").Copy Range("I1:J3").PasteSpecial End Sub
Step 7: Run the above code from the run button provided or press F5 to see the following result.
VBA Copy Paste – Example #4
For this example, I have data in row 10 and I want to paste the data in row 11. Have a look below to see what the data is in row 10 and row 11 is vacant.
Follow the below steps to use Excel VBA Copy Paste:
Step 1: Go to developer’s tab and click on Visual Basic to open VB Editor.
Step 2: Click on the module inserted to open up the code window,
Step 3: Declare a sub-function to start writing the code.
Code:
Sub Sample3() End Sub
Step 4: Activate the worksheet to use the properties of the worksheet.
Code:
Sub Sample3() Worksheets("Sheet1").Activate End Sub
Step 5: Copy the row 10 with the following code.
Code:
Sub Sample3() Worksheets("Sheet1").Activate Rows(10).EntireRow.Copy End Sub
Step 6: Paste the data of row 10 in row 11 with the following code.
Code:
Sub Sample3() Worksheets("Sheet1").Activate Rows(10).EntireRow.Copy Rows(11).EntireRow.PasteSpecial End Sub
Step 7: Run the above code by pressing F5 to see the following result.
Things to Remember
- In order to use data from any worksheet to copy it, we need to activate the worksheet first.
- Similarly, when we need to paste the data in any other worksheet in VBA we need to activate the destination worksheet first.
- In case we copy the whole column or row and paste the data in any other column then data anywhere in the row or column in the target cells get copied and pasted to destination cells. This may cause to have some certain unwanted data.
- The best way to copy the data is by copying a certain range and paste the data in the target cells.
Recommended Articles
This has been a guide to VBA Copy Paste. Here we discussed how to use Excel VBA Copy paste along with some practical examples and downloadable excel template. You can also go through our other suggested articles –
- VBA Paste
- VBA RGB
- VBA XML
- VBA Login