Excelファイルで、C列に、2行目から下に全て、条件付き書式を入れています。
そしてA2:E20000セルまでデータが入っており、マクロでこのデータの2行目以下をクリアしたい(1行目はタイトル行)と思います。このとき
endR=cells(rows.count,1).end(xlup).row
Range(cells(2,1),cells(endR,1)).entireRow.clearContents
このコードでは、データのクリア自体は出来るのですが、Excelがデータの終端を2万行目と認識したままになってしまい、ファイルサイズが重くなってしまいます。といってclearContentsの部分をDeleteにしてしまうと、C列に入れた条件付き書式が全て消えてしまいます。データの終端を2行目と認識させ、かつ条件付き書式も削除されないようにする確実な方法はないでしょうか？なおデータは2万行ぴったりとは限りませんし、何度も読み込んだりクリアしたりします。
↧