Please note javascript is required for full website functionality.
MVP

Blog

For Loops

14 April 2017

Last week, we showed you how to declare variables.  This week, we’re going to use a variable to create a loop.  Let’s introduce the For loop.

The basics of the For loop involve taking a variable, incrementing it until it gets to a certain target number, and performing a bit of code for each incremental step.  It looks a bit like this:

For X = 1 to 10

<Do this code for each of the 10 times>

Next X

We can use this to put together a simple example that counts the number of coin flips land Heads when we flip them 10 times.  Let’s combine a few of the things that we’ve learned.  If you like, you can copy the text below into VBA, or type it out yourself.

Sub FlipCoins()

Dim X as Integer

‘Declare an integer that will be incremented

Dim Heads as Integer

‘Declare a variable that will store the number of times a coin lands as Heads

Heads = 0

‘Set the initial value for the counter to be zero

For X = 1 to 10

If Rnd() >= 0.5 Then Heads = Heads + 1

‘Take a random number between 0 and 1.  If the value is greater than or equal to 0.5, then add one to the Heads counter.

Next X

MsgBox “You flipped” & Heads & “Heads over 10 coin flips.  Well done!”

End Sub

Have fun flipping coins!

Newsletter