【ExcelVBA公開模試】出席率の計算

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

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

問題

次の図のように、A2:G101にランダムに〇と×が入力されていて、〇を出席、×を欠席とする。空欄は出席にも欠席にもカウントせず、出席率の計算から除外する場合、H列に出席率（小数）を求めなさい。ただし、出席も欠席も０の場合は空欄とする。

わえなび式 正解例

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

目標回答時間

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

この問題の出題範囲

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

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

ご案内

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

正解例

Sub moshi()
   For i = 2 To 101
       maru = 0
       batsu = 0
       For j = 1 To 7
           If Cells(i, j) = "〇" Then
               maru = maru + 1
           ElseIf Cells(i, j) = "×" Then
               batsu = batsu + 1
           End If
       Next
       If maru + batsu = 0 Then
           Cells(i, 8) = ""
       Else
           Cells(i, 8) = maru / (maru + batsu)
       End If
   Next
End Sub

バックナンバー

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