vba excel 双重for嵌套为何报错？求da神支教

Sub move1()
Dim i As Byte
Dim o As Byte

For i = 1 To 5 Step 1
For o = 1 To 5 Step 1
Range(Sheets(1).Cells(9, 13), Sheets(1).Cells(8 + i * 18, 13)) = o
Next i
Next o
End Sub

Next ' i
Next ' o
注释掉这2个，不需要。有帮助麻烦点个采纳【本回答右上角】，谢谢~~有其他问题可以继续交流~

Sub move1()
Dim i As Byte
Dim o As Byte

For i = 1 To 5 Step 1
For o = 1 To 5 Step 1
Range(Sheets(1).Cells(9, 13), Sheets(1).Cells(8 + i * 18, 13)) = o
Next ' i
Next ' o
End Sub

2个for循环的结束语句位置错了，应该是：
For i = 1 To 5 Step 1
For o = 1 To 5 Step 1
.......
next o
next i