Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Use loop to select cells
Sub forDemo()
    Dim i As Integer
    For i = 1 To 24
        ActiveCell.FormulaR1C1 = i & ":00"
        ActiveCell.Offset(RowOffset:=1, ColumnOffset:=0).Select
    Next i
End Sub