【ExcelVBA公開模試】改行はvbNewLineを使ってJoinする

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

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

問題

図１のように、セル範囲A2:C2に数値が入力されている。これを利用して図２のようなMsgBoxを表示したい。次のコードを完成させなさい。

Sub moshi()
   a = Array("ご注文金額小計", "送料・手数料", "ご請求金額合計")


End Sub

＜図１＞

＜図２：完成イメージ＞

わえなび式 正解例

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

目標回答時間

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

この問題の出題範囲

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

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

ご案内

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

正解例

Sub moshi()
   a = Array("ご注文金額小計", "送料・手数料", "ご請求金額合計")
   For i = 0 To 2
       a(i) = a(i) & "：" & Cells(2, i + 1)
   Next
   MsgBox Join(a, vbNewLine)
End Sub

（別解）

Sub moshi()
    a = Array("ご注文金額小計", "送料・手数料", "ご請求金額合計")
    s = ""
    For i = 0 To 2
        s = s & a(i) & "：" & Cells(2, i + 1)
        If i <> 2 Then s = s & vbNewLine
    Next
    MsgBox s
End Sub

バックナンバー

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