次のコードを実行するとB列にA列セル内の文字数が代入されるマクロとして、
空欄に入る適切な語句を解答しなさい。
Sub Exam1()
Dim i As Long
For i = 1 To 5
Cells(i, 2) = 【 ① 】(Cells(i, 1))
Next i
End Sub
正解
【 ① 】len
【8章 関数】
解説
●指定した文字列の長さを返す関数はLen関数です。
スペースも1文字分としてカウントされます。
本問題では、A列のセルを引数に指定して文字列の長さ(文字数)をB列に代入しています。
【Len関数】
…指定した文字列の長さを返します。
構文
Len(文字列)
【コード解説】
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
スポンサーリンク
スポンサーリンク