hi all,

I would like to assign value for set of cells.

Image 2.png

Can someone give some advice to my code?


Sub test2()
Dim i As Integer, j As Integer, k As Integer

For i = 1 To 3
For j = 1 To 4
For k = 1 To 5
Cells(i, j).Value = k
Next k
Next j
Next i


End Sub