Loop through Defined Range

 

Below we will look at a program that loops through a defined range. For example, when we want to square the numbers in Range("A1:A3"). Did you know you can also loop through a dynamic range?

Situation:

Loop through Defined Range in Excel VBA

Place a command button on your worksheet and add the following code lines:

1. First, we declare two Range objects. We call the Range objects rng and cell.

Dim rng As Range, cell As Range

2. We initialize the Range object rng with Range("A1:A3").

Set rng = Range("A1:A3")

3. Add the For Each Next loop.

For Each cell In rng

Next cell

Note: rng and cell are randomly chosen here, you can use any names. Remember to refer to these names in the rest of your code.

4. Next, we square each cell in this range. To achieve this, add the following code line to the loop:

cell.Value = cell.Value * cell.Value

Result when you click the command button on the sheet:

Loop through Defined Range Result

5. If you want to check each cell in a randomly selected range, simply replace:

Set rng = Range("A1:A3")

with:

Set rng = Selection

6. Now, for example select Range("A1:A2").

Loop through Selection in Excel VBA

Result when you click the command button on the sheet:

Loop through Selection Result

Do you like this free website? Please follow us on Google+