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
正解を見る