Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

A counting variable I is initialized just prior to the loop and incremented inside the loop

Sub loopCounter()     Dim I As Integer     I = 1     Do While Cells(I, "A").Value <> ""            Cells(I, "B").Value = Cells(I, "A").Value            I = I + 1     Loop End Sub