エクセル 網掛けしてあるセルの行を残してそれ以外の行を削除するＶＢＡ

質問

windows-xp、エクセル2003を使っています。

エクセルデータがＡ列からＵ列まであります。
（1000件程かな、時々ＡＡ列まである時もあります）
Ｇ列には、網掛けしてあるセルがあります。
そこで！！
網掛けしてあるセルの行だけを残して、網掛けがされていない行のデータを一気に削除する！というマクロ（ＶＢＡ）を作りたいのですが、どうすればよいでしょうか？
ＶＢＡまだ、よくわかっていないので、初心者レベルでわかりやすく教えてくださると助かります。
宜しくお願い致しますm(_　_)m

回答No.3

ham_kamo

> ２行目のセルには、いろいろな項目があるのですが、
> 「品目テキスト」「明細」だけに水色で網掛けをしたいのです。
> そういうときのＶＢＡはどうなりますか？

ご質問の回答をする前に、何点か確認させてください。
プログラムを書くときには、厳密に「何がしたいか」が
わかっていないと、正確に書けないので。

・「品目テキスト」「明細」の列は決まっていて、その列名を指定して水色にするのでしょうか。それとも、シート構成が変わる可能性があって、２列目から「品目テキスト」「明細」の文字列を検索して特定して、水色にするのでしょうか。（この場合、行タイトルが変わるとマクロは正常に動かなくなります）

・水色の網掛けをするのは、該当する列の２行目から最後の行まで、ということでしょうか。それともデータ行だけ、あるいはタイトル行だけでしょうか。

・「水色」というのは、セルの書式設定で「パターン」を設定するときに出てくる色のうち、下から２番目、右から４番目の色でよろしいでしょうか。

・「網掛け」は同じくセルの書式設定の「パターン」ボタンを押したときに出てくるパターン一覧のうち、どれでしょうか。パターンのサンプルの上にマウスを乗せると、「75%灰色」とか「50%灰色」とか出てきます。このうちのどれかを教えてください。

以上、補足をお願いします。

補足

お手数おかけしています。
補足します。

(1)「品目テキスト」「明細」の列は決まっていません。
シート構成が変わる可能性があります。
「２行目に項目名が入っている」ということと、「その項目名は変わらない」ということは確かなのです。
が、Ａ列に「品目テキスト」がくる場合もあるし、Ａ列に「明細」の文字列がくる場合もあるのです。
前述しましたが、項目名は変わらないので、項目で検索して特定させて、水色にするというようにしたいのです。

(2)水色の網掛けをするのは、該当する列の２行目から最後の行まででお願いします。

(3)「水色」というのは、セルの書式設定で「パターン」を設定するときに出てくる色のうち、下から１番目、右から４番目の色でお願いします。というわけで、正式には「薄い水色」でした。すみません！！

(4)「網掛け」と言っていたのは、下から２番目の左から３番目です。

本当にいろいろ教えていただいており、大変恐縮です。
何卒、宜しくお願い致しますm(_　_)m