Excel VisualBasic Script

Sub NestedFor()
    Dim I As Integer
    Dim J As Integer
    
    For I = 1 To 10
        For J = 4 To 7
            Cells(I, Chr(J + 64)).Value = I * J
        Next J
    Next I
End Sub