Hoe gebruik ik de "While" statement in excel/access?

'[code]

Dim lCount As Long
Dim lNum As Long

lCount = 0
lNum = 11

Do While lNum > 10
lNum = lNum - 1
lCount = lCount + 1
Loop

MsgBox "The Do While loop made " & lCount & " loop(s)."

'[/code]

Dit is VBA (Visual Basic for Applications), dat wordt gebruikt in de ontwikkel omgeving in Excel, als je dit niet bedoeld dan heb ik je vraag verkeerd begrepen

Toegevoegd na 5 minuten:
Ik snap alleen niet waarom je een WHILE statement wilt, bijna alles kan met een For loop of iets anders.