スタンダード 模擬問題

Excel VBA スタンダード 模擬試験 ランダム順出題 ⑤ 第2問

次のコードは、 セル範囲A2:A10に入力されている文字列データから"-"を除去した結果を2列目に入力するマクロである。

空欄に入る適切な語句を解答しなさい。

Sub Exam1()

 Dim i As Long

 For i = 2 To 10

  Cells(i, 2) = Replace(Cells(i, 1), 【  ①  】, 【  ②  】)

 Next i

End Sub

excel-vba-standard-test-error-countermeasures
正解

【  ①  】"-" 【  ②  】""

【9章 エラー対策】

解説

【データクレンジング・Replace 関数】

文字列の中に含まれる不要な文字を除去するには、Replace 関数を使います。

・構文:Replace(元の文字列, 検索文字, 置換文字)

元の文字列:対象となる文字列です。

検索文字:除去したい文字や置換したい文字のことです。

置換文字:検索文字を置換する文字。不要な文字を除去する場合、""(空の文字列)を指定します。

本問題では検索文字として "-"(ハイフン)を指定し、置換文字として ""(空の文字列)を指定しています。を指定しています。

excel-vba-standard-test-error-countermeasures

【コード解説】

Sub Exam1()

 Dim i As Long

 For i = 2 To 10

’⓵For…Nextステートメント 変数へ開始値から終了値の間で繰り返し処理をする。

  Cells(i, 2) = Replace (Cells(i, 1), "-", "")

’指定の検索文字を、置換文字「””」空欄に置き換え左辺に代入する。

 Next i

’⓵に戻り終了値まで変数「i」の繰り返し処理をする。

End Sub