最終更新日:2021-10-06オートフィルターを退避回復するVBAクラスシートにオートフィルターが適用されていて、かつ絞り込みされている場合は、マクロVBAでは、何かと注意が必要になります。このような場合、オートフィルターを解除するか、フィルター絞り込みをクリアして対応している事が多くなります。オートフィルターを解除したり、フィルターをクリアしてしまうと、それまでの絞り込み条件が消えてしまい、元の状態に戻すことができなくなります。問題になるのは、最終行の取得方法でしょう。非表示行がある場合は、本来の表の最終行は取得できません。CurrentRegion等を使う事で、対応するVBAにすることはできます。・サイト内関連ページまた、セルのコピーをしている場合の問題点もあるでしょう。Copyメソッドでは、フィルターで非表示になっている行はコピーされません。オートフィルターでの絞り込みがされている場合、マクロVBAで使えるテクニックが制限されます、逆の言い方をすれば、よりテクニックが必要になってきます。・フィルター絞り込みをクリア・フィルターされていても良いマクロVBAを書くこのいずれかになるだろうと思います。このような対応の方がより良いはずです。したがって今回作成のVBAクラスは、フィルター、条件付き書式、そしてVBAクラス、さらにDictionaruの学習素材としてお考えいただいたほうが良いかもしれません。オートフィルターのフィルター条件を退避しておき、後で元に戻せるようにしたVBAクラスになります。後に述べるように、完全には元に戻せない場合も多くありますのでぜひ最後までお読みください。その上で、あくまでVBAの学習素材としてお使いください。実際にお使いになる場合は、独自に改良したうえでご使用ください。オートフィルターに関するページオートフィルターに関するページは以下のように多数ありますので、オートフィルターの基本については以下をお読みください。・オートフィルタまとめマクロの記録でVBA:第18回.オートフィルタフィルタをやりましょう。表計算らしい機能ではあります。マクロの記録です、データは何でも良いでしょう。3.1のみ選択...たまたま1のデータを入れただけです。作成れたマクロは、2003の場合は、Selection.AutoFilterSelection.AutoF...マクロの記録でVBA:第19回.オートフィルタ2前回の続きで、フィルタをやります。以下の表で説明します。