次のコードを実行するとB列にA列セル内の文字数が代入されるマクロとして、空欄に入る適切な語句を選択肢から1つ選びなさい。
Sub Exam1()
Dim i As Long
For i = 1 To 5
Cells(i, 2) = 【 空欄 】(Cells(i, 1))
Next i
End Sub
1. Len
2. Mid
3. Hour
4. Count
正解
1
【8章 関数】
解説
●指定した文字列の長さを返す関数はLen関数です。
スペースも1文字分としてカウントされます。
本問題では、A列のセルを引数に指定して文字列の長さ(文字数)をB列に代入しています。
【Len関数】
…指定した文字列の長さを返します。
構文
Len(文字列)
次のコードを実行するとB列にA列セル内の文字数が代入されるマクロとして、空欄に入る適切な語句を選択肢から1つ選びなさい。
1. Len
正しい。
Len関数は、文字列の長さ(数)を取得するための関数です。
2. Mid
誤り。
Mid関数は、文字列から指定した位置から指定した文字数分の文字列を抜き出すための関数です。
3. Hour
誤り。
Hour関数は、時刻の「時」を取得するための関数です。
4. Count
誤り。
Countプロパティは、シート数などオブジェクトの数を取得するためのプロパティです。
【コード解説】
Sub Exam1()
Dim i As Long
For i = 1 To 5
’① For…Nextステートメント 変数「i」へ1から5の間で代入し、繰り返し処理をする。
Cells(i, 2) = Len(Cells(i, 1))
’ Len関数でA列のセルを引数に指定して文字数をB列に代入する。
Next i
’For…Nextステートメント 終了値まで変数「i」の繰り返し処理①へもどる。
End Sub
