VBA Set

Excel VBA Set

In VBA, an object is a core of the excel because without objects we cannot do anything. Objects are Workbook, Worksheet, and Range. When we declare a variable we need to assign a data type to it and we can also assign objects as data types. To assign a value to declared object variables we need to use the word “SET”. The word “Set” used to refer new object in VBA, for example, referring to the particular range of the particular worksheet.

In this article, we will show you how to use the VBA “Set” statement to reference object variables.

VBA Set with Range Object Variables

We will show you a simple example of using the Set function in VBA.

For example assume you want to use the range A1 to D5 quite often. Instead of writing the code as Range(“A1:D5”) every time we can declare the variable as range and set the range reference as Range(“A1:D5”)

Step 1: Declare the variable as Range object.

Code:

Sub Set_Example()

Dim MyRange As Range

End Sub

Step 2: The moment we assign the data type as range use the word “Set”.

Code:

Sub Set_Example()

Dim MyRange As Range

Set MyRange =

End Sub

Step 3: Now mention the range.

Code:

Sub Set_Example()

  Dim MyRange As Range

  Set MyRange = Range("A1:D5")

End Sub

Step 4: Now the variable “MyRange” is equal to the range A1 to D5. Using this variable we can access to all the properties and methods of this range.

We can copy, we can add a comment, we can do many other things.

For example purpose, I have created some numbers here.

Now using the variable I will change the font size to 12.

Code:

Sub Set_Example()

  Dim MyRange As Range

  Set MyRange = Range("A1:D5")

  MyRange.Font.Size = 12

End Sub

This will change the font size of the assigned range.

Like this, we can do many things with a particular range by using the word “Set” in excel VBA.

VBA Set with Worksheet Object Variables

We have seen how “set” works with a range object in VBA. It works exactly the same as the worksheet object as well.

Let’s say you have 5 worksheets in your workbook and you want to keep going back to the one particular worksheet, you can set that worksheet name to the defined object variable.

For example, look at the below code.

Code:

Sub Set_Worksheet_Example()

    Dim Ws As Worksheet

    Set Ws = Worksheets("Summary Sheet")

End Sub

In the above code, the variable “Ws” defined as object variable and in the next line by using the word “Set” in VBA code we set the variable to the worksheet named as “Summary Sheet”.

Now by using this variable, we can do all the things associated with it. Take a look at the below two sets of code.

Without “Set” Word

Code:

Sub Set_Worksheet_Example1()

    'To select the sheet
    Worksheets("Summary Sheet").Select

    'To Activate the sheet
    Worksheets("Summary Sheet").Activate

    'To hide the sheet
    Worksheets("Summary Sheet").Visible = xlVeryHidden

    'To unhide the sheet
    Worksheets("Summary Sheet").Visible = xlVisible

End Sub

Every time I have used the worksheets object to refer to the sheet “Summary Sheet”. This makes the code so lengthy and requires a lot of time to type.

As part of the huge code, it is frustrating to type the worksheet name like this every time you need to reference the worksheet.

Now take a look at the advantage of using the word Set in VBA Code.

With “Set” Word

Code:

Sub Set_Worksheet_Example()

    Dim Ws As Worksheet

    Set Ws = Worksheets("Summary Sheet")

   'To select the sheet
    Ws.Select

   'To Activate the sheet
    Ws.Activate

   'To hide the sheet
    Ws.Visible = xlVeryHidden

   'To unhide the sheet
    Ws.Visible = xlVisible

End Sub

This is very simple and need. The moment we set the worksheet name we can see the variable name while entering the code as part of the list.

Set with Workbook Object Variables

The real advantage of the word “Set” in VBA arises when we need to reference different workbooks.

When we work with different workbooks it is so hard to type in the full name of the workbook along with its file extension.

Assume you have two different workbooks named as “Sales Summary File 2018.xlsx” and “Sales Summary File 2019.xlsx” we can set the two workbooks like the below code.

Code:

Sub Set_Workbook_Example1()

Dim Wb1 As Workbook
Dim Wb2 As Workbook

Set Wb1 = Workbooks("Sales Summary File 2018.xlsx")
Set Wb2 = Workbooks("Sales Summary File 2019.xlsx")

End Sub

Now variable Wb1 is equal to the workbook named as “Sales Summary File 2018.xlsx” and variable Wb2 is equal to the workbook named as “Sales Summary File 2019.xlsx”.

Using this variable we can actually access all the properties and method associated with the workbook.

We can shorten the code like the below.

Without Using VBA Set Key Word to activate the workbook:

Workbooks("Sales Summary File 2018.xlsx").Activate

Using the Set Key Word in Excel VBA to activate the workbook:

Wb1.Activate

This makes the writing of the code lot simpler and also once the workbook name it set there is worry of typo error of the workbook names.

Recommended Articles

This has been a guide to VBA Set. Here we learned how to use Excel VBA Set Statement to reference the object variables along with some simple to advanced examples. Below are some useful excel articles related to VBA –

• Excel VBA LEN Function
• VBA Code in Excel
• Use VBA Time
• How to use VBA ReDim?
• Left Function in VBA
• AutoFilter in VBA