Excel ベーシック 問題 8 – 20

マクロ「Test1」は、ユーザーが入力した文字列がA列にあった場合に「○」、なかった場合に「×」をB列に入力するプログラムである。このとき、【　1　】に入る適切な内容を答えなさい。

Sub Test1()

    Dim i As Long, A As Variant, B As Long

    A = 【　1　】("探したい文字列を入力してください")

    For i = 1 To 6

        B = InStr(Cells(i, 1), A)

        If B <> 0 Then

            Cells(i, 2) = "○"

        Else

            Cells(i, 2) = "×"

        End If

    Next i

End Sub

選択肢

  1. MsgBox
  2. Input
  3. InputBox
  4. StrConv
正解を見る
前へ
次へ