In this Excel Vba tutorial article, I will explain how to use the While Wend loop in Excel VBA Code.
We use loops in Excel when we have to run several condition checks repeatedly in Excel VBA. Sometimes we use: if, end if loop which is a very simple and most used loop.
"Process if condition is true"
Then we have a for loop if we know exactly how many times the loop must run:
For I = 1 to N
In this loop, it will run the process for a N number of times.
Now sometimes we have a certain condition, so we must keep the loop running as many times as possible till the condition is not true. Here comes the While Wend loop:
It will keep running till the condition is true:
First, the While condition is tested.
- if the condition is FALSE, the program immediately jumps to the command immediately after the word Wend
- if the condition is TRUE, then all commands inside the loop (i.e., between the words Do While and Loop) are executed.
Basic While Wend Loop example
Dim countA: countA = 100
While countA < 110 ' Test value of Counter.
MsgBox "The Current Value of the Counter is : " & countA
countA = countA + 1 ' Increment Counter.
This loop will keep running till we have the condition true : countA value is less than 110.
So this loop will run 10 times:
Iteration1 : CountA = 100
Iteration2 : CountA = 101
Iteration3 : CountA = 102
Iteration4 : CountA = 103
Iteration5 : CountA = 104
Iteration6 : CountA = 105
Iteration7 : CountA = 106
Iteration8 : CountA = 107
Iteration9 : CountA = 108
Iteration10 : CountA = 109
For the next iteration, CountA = 110 so the condition will become false and the loop ends.
Calculating the factorial of numbers in a While Wend Loop
x = 0
y = 0
While x < 10
x = x+1
y = y*x
ActiveDocument.Content= "Factorial result of " & x & " = " & y
While Wend Loop to calculate SUM in Excel.
n = InputBox("Enter n value:")
Dim j As Single
Dim i As Integer
i = 1
While (i <= n)
j = j + i
i = i + 1