エクセルマクロ 特定の文字列を含む行を削除

＞りんごを含んでいる行のみ削除 これは特定の列に削除文字列があれば削除するのですか？ それとも列を限定せず１行のどこかに文字列があれば削除するのですか？ 以下のサンプルはマクロ２行目で指定した列に指示した文字列がある行を削除していますが、マクロ中コメントアウトしている９行目を８行目のIf文と入れ替えると、１行のどこかに指定文字列があれば削除します。 Sub Macro1() Const col As String = "A" '文字列が入力されている列 Dim idx As Long Dim keyWord keyWord = Application.InputBox("削除対象の文字列は？", Type:=2) If TypeName(keyWord) <> "Boolean" And Len(keyWord) > 0 Then For idx = Cells(65536, col).E