次のコードはA列で”東京”を探し、見つかったセルを含む行全体を削除するマクロである。空欄に入る適切な語句を解答しなさい。
Sub Exam1()
Dim A As Range
Set A = Range(“A:A”). Find (What:=”東京”)
If A Is Nothing Then
MsgBox “見つかりませんでした”
Else
A.【 ① 】. Delete
End If
End Sub
正解
【 ① 】EntireRow
解説
任意のセルを含む行全体: 任意のセル.EntireRow
本問題では検索で見つかったセルが=任意のセルとなります。
なお任意のセルを含む列全体は 任意のセル. EntireColumn で表します。
削除はDeleteメソッドを使用します。
スポンサーリンク
スポンサーリンク