【ExcelVBA公開模試】空白セルに最大値＋１を入力する

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

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

問題

次の図のように、セルA2以降に数値が入力されている。また、セルC2にはA列の数値の最大値＋１を求める数式「=MAX(A:A)+1」が入力されている。

セルA2から下向きに空白セルを探し、見つかったらその空白セルに、セルC2の値を転記しなさい。また、この操作を2回実行したとき、セルC2の値はいくつになるか答えなさい。

わえなび式 正解例

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

目標回答時間

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

この問題の出題範囲

「速読VBA単語」Program3-8まで

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

ご案内

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

正解例

空白セルを探すWhile文は基本中の基本。実際に業務で使うかどうかにかかわらず必ず暗記すべきです。While文が終わった直後の「i」は見つかった空白セルの行番号を指します。

2回実行すると1033、1034が空白セルに入り、最大値＋１＝1035となります。

Sub moshi()
   i = 2
   Do While Cells(i, 1) <> ""
       i = i + 1
   Loop
   Cells(i, 1) = Range("C2")
End Sub

バックナンバー

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