Excel スタンダード 問題 6 – 18

インプットボックスに入力した文字列がA列にあるか探し、見つからない場合は「該当なし」、見つかった場合は見つかった文字列のアドレスを表示したい。このとき、【 1 】に入る適切な内容を答えなさい。なお、大文字と小文字は区別せずに検索するものとする。

Sub Test1()

    Dim A As String, B As Range

    A = InputBox("分類コードを入力して下さい")

    Set B = Range("A:A").Find(What:=A, 【 1 】:=False)

    If B Is Nothing Then

        MsgBox "該当なし"

    Else

        MsgBox B.Address

    End If

End Sub

正解を見る