名称未設

【ExcelVBA公開模試】リーグ表を完成させる

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

問題

次の図1でセル範囲B2:K11のうち右上の部分が空欄で、左下の部分に3,1,0のいずれかの数値が入力されている。図2のように、左下の部分が3,1,0であれば、右上の部分の該当するセルにそれぞれ0,1,3と入力しなさい。

<図1>

<図2:完成イメージ>

わえなび式 正解例

(このページの下にあります)

目標回答時間

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

この問題の出題範囲

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

ご案内

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

正解例

Sub moshi()
   For i = 2 To 11
       For j = 2 To 11
           If i < j Then
               If Cells(j, i) = 3 Then
                   Cells(i, j) = 0
               ElseIf Cells(j, i) = 1 Then
                   Cells(i, j) = 1
               ElseIf Cells(j, i) = 0 Then
                   Cells(i, j) = 3
               End If
           End If
       Next
   Next
End Sub

バックナンバー


この記事が気に入ったらサポートをしてみませんか?