In the previous post, we introduced the VBA Range object. This gave us the foundation of working with Ranges in VBA. In today’s post, I’d like to discuss how to get and set cell values through VBA. This will continue to build up our understanding of the VBA Range object and how to use it. There are several ways you can get and set cell values with VBA and I’ll do my best to cover all the necessities, but at the same time keeping it short and to the point. Let’s get started.
Getting Cell Values
To get a cell’s value in VBA, we need to refer to it with the Range object and then call the
We’ll use the following spreadsheet for our example. It’s a simple table with some names in it.
To get the value from cell
A2 you can use this code snippet:
This will take cell
A2 and put it in the variable
val. Then we print out the value in the Immediate Window (which the value in our example is
You can also set the range to a variable and access the value from that variable as well:
What happens if you use .Value on a set of cells?
Let’s change our previous code snippet to the following:
If you run this code, you will get an error stating that there is a type mismatch.
What’s going on here?
The problem is that when you work with a set of cells,
.Value can only return a single value. So when we ask VBA to return
.Value on our variable (which refers to multiple cells), the
.Value property doesn’t know which cell we are referring to.
How do you get a single cell from a set of cells?
In order to use
.Value to get a value from a cell, we need to refer to a single cell from the range of cells in our variable. The way we do that is with the
Cells() VBA function.
The Range.Cells Function
Cells() function is a way to take a range of cells and return a single cell from the set. Here is the function defined:
||Integer||The row number from within the range that you want to refer to.|
||Integer||The column number from within the range that you want to refer to.|
Take a look at the following code:
Here we took the range of
A2:A5 and referred to row 1 column 1. Since the range variable
cellRange refers to
A2:A5, the first row is row
2 and the first column is
When using the
Cells() function, remember that row 1 and column 1 represent the top-left most cell within the range that the
Cells() function is working on. If your range is
Cells(1, 1) will refer to
A1, but if your range is
Cells(1, 1) refers to
Ok, that covers getting cell values from range objects, now let’s discuss setting cell values with range objects.
Setting Cell Values
In order to set a cell’s value, you can use the same
.Value property when referring to a cell. In this example, we’ll take
A2‘s value and change it from
First we set the variable
A2. Then we said
cellRange.Value = "John" which changes the variable’s
.Value property. Remember, though, that the variable is a reference to cell
A2, so whatever you do to that variable, you also do to cell
A2 in the worksheet. Finally, we output the value of
A2 into the Immediate Window to see that it changed.
We can also see the value changed in the worksheet after we run this code:
How do you set multiple cells’ values?
Remember how I said that you can only read from one cell using
.Value? Well, when setting values, you can actually set multiple cells at one time by using
.Value. Take a look at the following code:
If you ran this code, it would set all
A2:A5‘s cells to
Well, maybe you’d actually want to do this for some other scenarios, like when you want a bunch of cells to repeat a value.
Let’s take a real example for a second. Let’s say we have two columns,
First Name and
Last Name. We want to take the
Last Name column and place its value after the
First Name‘s value; essentially combining the values to make a single
Here’s our sample data:
Our task is to combine the first and last name columns and place the result in column
A. How do we do that?
One solution is to loop through cells
A5 and then set that cell’s value to its own value, plus a space, plus the last name of the cell right next to it.
Sounds easy enough, let’s code it up:
Let’s step through the code.
- First, we create a variable called
names. Then, we set that to range
- Next, we create a variable called
cell. This is going to be a temporary variable that will change with each iteration of the loop.
- Then, we create the loop. Here, we’re looping through the
namesrange object and setting the current item to the
cellvariable. This means that each time we run through the loop,
cellrepresents a single range object.
- The first time the loop is run,
cellis set to
A4, and finally
A5. After that, there are no more cells to go through in the
namesvariable, so the loop ends.
- I’ll go over how to loop through ranges in a future post since this post is already long enough!
- The first time the loop is run,
- Now we’re ready to combine the first and last names. How we do that is with another Range function called
Offset(rows, columns). The idea with this function is that if you’re on a cell like
A2and you say
cell.Offset(0, 1)what we’re really saying is “move over one column to the right”. This puts us on cell
B2. That’s how we’re able to get the last name in our example.
- I’ll discuss how to use the
Offset()function in more detail in a future post. Again, this post has gone on long enough 🙂
- I’ll discuss how to use the
Here are the results of the code after we run it:
From here, we could change the
A1 cell to just
Name and delete column
Getting and Setting Cell Values from a Named Range or Table Name
One last thing I’d like to touch on is when you use the
Range() function, you can use a named range or table name instead of a range like
A2:A5. In our first example, our data is in a table named
Table1. To refer to the data of the table, we could use the following:
And to refer to the entire table, we can leverage structured references like so:
This will return
A1‘s value “Name” since the table starts in
Also, if you’re new to Excel Tables, click here to learn more.
Honestly, there is so much to discuss with range objects in VBA. I’ll be touching on many more topics regarding ranges in VBA in upcoming posts such as:
- Modifying cell colors
- Finding cells by their text values
- Filtering data
- Getting the last row in a range (you need this more often than you think)
I’ll come back to this post and put links to these posts as I create them.
If you enjoyed this content, please share and subscribe!