Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. 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