Copy Paste in VBA

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 we copy, we cut, and we paste the data from one cell to another cell. It requires no special introduction as well. However, while learning VBA coding is important to understand the same concept in coding language. Copy Paste in VBA is the routine task we do in the day in day in excel. In order to copy first, we need to decide which cell to copy.

Example #1 – Copy and Paste Values Using Range Object

Assume you have the word “Excel VBA” in the cell A1.

Let’s say for an example if you want to copy the cell A1 we can use VBA RANGE object.

Code:

Sub Copy_Example()

  Range ("A1").

End Sub

The moment you reference the cell we can see all the properties and methods with it. So select the method “Copy”.

Code:

Sub Copy_Example()

  Range("A1").Copy

End Sub

After selecting the method press space key to see the argument of the Copy method.

It says Destination.

This 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 by using Range object. Let us say if we want to paste the value in B3 cell we can put the destination as “Range(“B3”)”.

Code:

Sub Copy_Example()

  Range("A1").Copy Destination:=Range("B3")

End Sub

This will copy the data from cell A1 and paste in the 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 & select the data from cell A1 and paste in the cell B3.

Example #2 – Copy to another Worksheet in the Same Workbook

Now if we want to copy paste the value from the different worksheet using VBA macro then in the Destination argument we need to reference the sheet name by using WORKSHEETS object then mention the range of cells in that WORKSHEET. 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 particular sheet and want to paste in another particular sheet, we need to mention both the sheets names.

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 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 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 the 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

In the active workbook, it 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 the 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 I 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 the cell A1 should be equal to the value in the 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 the 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 just use 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 below code.

Code:

Sub Copy_Example2()

  Worksheets("Sheet1").UsedRange.Copy Destination:=Worksheets("Sheet2").Range("A1")

End Sub

This will copy the entire used range in the worksheet “Sheet1” and will paste the same in the worksheet “Sheet2”

Recommended Articles

This has been a guide to VBA Copy Paste. Here we discuss the top ways to Copy and Paste in VBA along with examples & downloadable excel template. Below are some useful excel articles related to VBA –

• Sub in VBA
• GoTo Function in VBA
• VLookup Examples in VBA
• VBA Arrays Examples
• InputBox in VBA