【ExcelVBA公開模試】縦横2方向に連番を入力する（その１）

文法を無視して、とりあえず動けばいいという邪道ExcelVBA講座こと「速読VBA単語」に準拠した問題を出題します。

わえなび速読VBA単語【邪道ExcelVBA基本講座】｜わえなび VBA｜note

問題

2020年はうるう年なので、2月は29日まである。ExcelVBAを用いて、次の図のように入力しなさい。ただし、2020年の各月の日数は次の数式で求めるものとする。

Day(DateSerial(2020, 月 + 1, 0))

わえなび式 正解例

（このページの下にあります）

目標回答時間

プロ2分以内、アマチュア10分以内に処理ができたら合格

この問題の出題範囲

「速読VBA単語」Program3-6-2まで

わえなび式ExcelVBA公開模試（無料） - Program3_6_2｜わえなび VBA｜note

ご案内

ExcelVBAをなんとなく理解できればいいという初心者のための「速読VBA単語」を受講希望の方はカリキュラムをご覧ください。

正解例

Sub moshi()
   For i = 1 To 12
       eom = Day(DateSerial(2020, i + 1, 0))
       r = 3 * i - 2
       Cells(r, 1) = i & "月"
       For j = 1 To eom
           Cells(r, j + 1) = j
       Next
   Next
End Sub

バックナンバー

わえなび式ExcelVBA公開模試（無料）｜わえなび VBA｜note