VBA Paste Special

VBA Paste Special (Table of Contents)

• Paste Special in Excel
• Formula
• Examples

Similar to worksheet when we copy a data and paste it on a different cell range we have a paste special method which allows us to paste the data as itself or only the formulas or only the values and same fashion we can use Paste Special in VBA using the range property method as follows range. paste special() providing the type we want in the brackets.

Paste Special in VBA

Paste Special in excel serves in many ways in our daily workplace. Using paste special we can do much more things than the usual ones. Copy & paste is there everywhere in the computer world. But paste special is the advanced thing in excel.

Like regular excel paste special in VBA too we have paste special method to paste the copied data. Copying the things in excel is not a strange thing for excel users, they copy, paste and most of the time they use paste special to serve their purpose in many ways.

In regular excel paste includes many options like paste only values, paste formulas, paste formats and etc…

Paste special has to Paste, Operation, Skip Blanks, and Transpose like this in VBA too we have all the parameters with Paste Special method.

Formula of Paste Special in VBA

Below is the Formula for Paste Special in VBA

Paste Special is available with VBA Range object because after copying the data we will be pasting it in the cell range so paste special method is available with range object.

Paste Type: After copying the data how do you want to paste. Whether you want to paste values, formulas, formats, validation etc.. Below are the complete list of options available under Paste Type.

Paste Special Operation: While pasting do you want to perform any kind of operations like add, subtract, division, multiplication or none.

• [Skip Blanks]: If you want to skip blanks then you can choose TRUE or FALSE.
• [Transpose]: If you want to transpose the data then you can choose TRUE or FALSE.

Examples of Paste Special in Excel VBA

Following are the examples of paste special in VBA.

Example #1 – Paste only Values using VBA PasteSpecial Function

In the first example, we will perform pasting only values using paste special. Assume below is the data you have in the sheet name called Sales Data.

Now we will perform the task of copy & paste using several paste special methods. Follow the below steps.

Step 1: Create a macro name first.

Step 2: First copy the range A1 to D14 from sheet name “Sales Data”. To copy the range apply below code.

Code: 

Range("A1:D14").Copy

Step 3: After copying the data we will be pasting the values from G1 to J14. First reference the range.

Code:

Range ("G1:J14")

Step 4: After selecting the range we need to paste. So put a dot (.) and select Paste Special method.

Code:

Sub PasteSpecial_Example1()

    Range("A1:D14").Copy
    Range("G1:J14").PasteSpecial

End Sub

Step 5: From the drop-down list, Select the option “xlPasteValues”.

Code:

Sub PasteSpecial_Example1()

   Range("A1:D14").Copy
   Range("G1:J14").PasteSpecial xlPasteValues

End Sub

Step 6: Now run this code using F5 key or manually and see what happens.

So our code copied the data from A1 to D14 and pasted from G1 to J14 as values.

It has performed the task of shortcut excel key in worksheet ALT + E + S + V.

Example #2 – Paste All using VBA PasteSpecial

Now we will see what happens if we perform the task of xlPasteAll.

Code:

Sub PasteSpecial_Example2()

   Range("A1:D14").Copy
   Range("G1:J14").PasteSpecial xlPasteAll

End Sub

Now if you run this code manually through run option or by pressing the F5 key, we will have as it is data.

Example #3 – Paste Formats using VBA PasteSpecial Function

Now we will see how to paste only formats. Below code would do the job for us.

Code:

Sub PasteSpecial_Example3()

   Range("A1:D14").Copy
   Range("G1:J14").PasteSpecial xlPasteFormats

End Sub

If you run this code using F5 key or manually we will get the only format of the copied range nothing else.

Example #4 – Paste Column Width using VBA Paste Special

Now we will see how to paste only column width from the copied range. For this, I have increased the column width for one of my data columns.

Apply below code it will paste only column width of the copied range.

Code:

Sub PasteSpecial_Example3()

 Range("A1:D14").Copy
 Range("G1:J14").PasteSpecial xlPasteColumnWidths

End Sub

Run this code and see the difference in the column width.

Now we can see Sales column width has been increased to the column width of our copied range column.

Example #5 – Copy the Data from One Sheet to Another Sheet using VBA Paste Special Option

We have seen how to copy and paste the data in the same sheet. Now we will how to paste from one sheet to another sheet.

Step 1: Before we select the range we need to tell from which sheet we need to select the data.

Code:

Sub PasteSpecial_Example5()

   Worksheets ("Sales Data")

End Sub

Step 2: After selecting the sheet by its name then we need to select the range in that sheet. The copy it.

Code:

Sub PasteSpecial_Example5()

  Worksheets("Sales Data").Range("A1:D14").Copy

End Sub

The above code says in the sheet name “Sales Data” copy the Range (“A1:D14”)

Step 3: Since we are pasting it in the different sheet we need to select the sheet by its name.

Code:

Sub PasteSpecial_Example5()

  Worksheets("Sales Data").Range("A1:D14").Copy
  Worksheets ("Month Sheet")

End Sub

Step 4: Now in the sheet “Month Sheet” select the range.

Code:

Sub PasteSpecial_Example5()

  Worksheets("Sales Data").Range("A1:D14").Copy
  Worksheets("Month Sheet").Range ("A1:D14")

End Sub

Step 5: Using Paste special we will be pasting values and format.

Code:

Sub PasteSpecial_Example5()

  Worksheets("Sales Data").Range("A1:D14").Copy
  Worksheets("Month Sheet").Range("A1:D14").PasteSpecial xlPasteValuesAndNumberFormats

End Sub

Step 6: We are not only pasting values and format using VBA Paste Special but we are pasting it as TRANSPOSE as well.

Code:

Sub PasteSpecial_Example5()

Worksheets("Sales Data").Range("A1:D14").Copy
Worksheets("Month Sheet").Range("A1:D14").PasteSpecial xlPasteValuesAndNumberFormats, Transpose:=True

End Sub

Now run this code it will copy and transpose the data to “Month Sheet”.

Things to Remember About Excel VBA PasteSpecial Function

• If you want to skip blanks you need to enter the argument as TRUE by default it takes FALSE.
• If you want to transpose the data we need to select the transpose as TRUE.
• We can perform only one paste special at a time.

Recommended Articles

This has been a guide to Excel VBA PasteSpecial. Here we learn the top 5 ways to use VBA PasteSpecial Function along with practical examples and downloadable VBA codes. Below are some useful excel articles related to VBA –

• Record VBA Macros
• VBA Paste
• Transpose in VBA
• False in Excel
• VBA Code in Excel Function
• Types of VBA Loop
• Types of Arrays in VBA
• VBA Macros Training Bundle
• VBA FIND Function Examples