前回、指定のキーワードを含む行を削除したい http://q.hatena.ne.jp/1424769500 という件につきまして、多くの方のご協力をいただきました。
ありがとうございました。
今回は、「指定のキーワードを含む行“以外”」を削除したいのです。
例えば、「バナナ」というキーワードを含む行は残して。
“バナナ”という文字列が、部分一致でも入っていない行については削除する。
といったような処理をマクロで行いたいです。
ご協力いただければ幸いです。
よろしくお願い致します。
前回のベストアンサーの回答の以下の部分を修正すればいいかと。
If InStr(kt(r, 1), keyWord) = 0 Then st(r, 1) = r Else st(r, 1) = DelNum End If
↓
If InStr(kt(r, 1), keyWord) = 0 Then st(r, 1) = DelNum Else st(r, 1) = r End If
ありがとうございます、うまく行が削除されました!
2015/03/17 07:15:28