林竣哲102判斷式與迴圈for loop

Public Sub 林竣哲() Cells(1, 1) = "林竣哲" Cells(1, 1).Font.Color = RGB(0, 0, 255) Cells(1, 1).Font.Size = 20 For i = 2 To 15 For j = 1 To 4 Cells(i, j) = (2010 + i) & "年" & j & "月" Next Next End Sub