Excel VBA スタンダード模擬問題 ① 6章-1

以下のコードはセルを検索し見つかった場合コピーするマクロである。空欄に入る適切な語句を解答しなさい。

Sub Exam1()
　Dim N As Range
　　Set N = Cells.【　①　】(【　②　】:=”東京”, LookAt:=xlWhole)
　　　　If Not N Is Nothing Then
　　　N.Copy Range(”C2”)
　End If
End Sub

正解

【　①　】Find

【　②　】What

解説
セルの検索構文以下の通り

構文：セル範囲. Find (What:= 検索する語句, LookAt:= 検索一致条件の定数)

LookAt以降に検索の一致条件の定数を指定します。完全一致で検索する場合は　xlWhole 部分一致で検索する場合は　xlPart　を指定します。

なおLookAtや以降の一致条件の定数は省略可能です。その場合前回指定した一致条件が引き継がれます。
省略可能： LookAt:= xlWholeやxlPartなどの一致条件の定数

If Not N Is Nothing Then　…は検索する語句が見つかった場合はそれ以降の処理を行います。

　　　　　前へ　　　　　　次へ