【2026年9月最新】ExcelVBAのオートフィルターの設定・解除方法とは？FilterModeとAutoFilterModeの違いまで非エンジニアにもわかりやすく解説

「業務マクロを再実行したら、なぜか「実行時エラー」が出て止まってしまった」「オートフィルターを解除するコードを書いたはずなのに、思った通りに動かない」——ExcelVBAでオートフィルターを操作するマクロを作っていると、こうしたトラブルに一度は遭遇するはずです。

この手のトラブルの多くは、「フィルターの矢印（ドロップダウン）自体を消す」ことと「フィルターの絞り込み条件だけを解除する」ことを、コードの中で混同してしまうことが原因です。この2つは似ているようで、Excel内部では別の状態として管理されています。

この記事では、VBAでオートフィルターを設定・解除する基本的な方法から、多くの解説記事が見落としがちな「FilterMode」と「AutoFilterMode」という2つのプロパティの違いまで、非エンジニアの経営者・管理職の方にも分かる言葉で解説します。後半では、弊社（株式会社GENAI）がAIエージェント「Claude Code」を使って、こうした業務マクロの改修をどう運用しているかも紹介します。

代表菅澤

VBAのコードを自分で書ける必要はありません。ただ「フィルターの矢印を消す」のと「絞り込みを解除する」が別物だと知っておくだけで、業務マクロのエラーに落ち着いて対処できるようになります。

AI鬼管理山崎

弊社でも、オートフィルターまわりのエラーで「マクロを2回目に実行するとエラーで止まる」という相談を何度も受けてきました。今日はこの「地味だが実務でよくハマるポイント」を、コードが読めない方にも分かる言葉で整理していきます。

この記事を最後まで読むと、次の6つが明確になります。

01 WHY IT MATTERS 経営者・管理職が「フィルターの解除」でつまずく理由 マクロを2回目に実行すると急にエラーになる、という典型的な相談

大量のデータを扱うExcel業務では、次のような相談が定期的に発生します。

こうした問題の背景には、多くの場合「今、シートがどういうフィルター状態にあるかを確認せずに、決め打ちでコードを書いている」という原因が関係しています。Excelのフィルター機能には、実は「矢印が表示されているか」と「実際に絞り込みが効いているか」という2つの異なる状態が存在し、これを区別せずに操作すると実行時エラーの温床になります。

1-1. 「2回目だけエラーになる」は典型的な症状

VBAのオートフィルター関連のエラーで特に多いのが、「1回目の実行では問題ないが、2回目以降でエラーになる」というパターンです。これは、1回目の実行でフィルターの状態が変化し、2回目の実行時にはコードが想定していた状態と食い違ってしまうことが原因です。次章から、この状態管理の仕組みを具体的に見ていきます。

02 THE BASICS VBAでオートフィルターを設定する方法 単一条件・複数条件の絞り込みを書く

まずは基本の設定方法です。VBAでオートフィルターを設定するには、対象の範囲（Range）に対してAutoFilterメソッドを実行します。

Sub SetFilterExample()
    ' A1:C100の範囲に、3列目(C列)が"完了"の行だけ表示するフィルターを設定
    Range("A1:C100").AutoFilter Field:=3, Criteria1:="完了"
End Sub

Field:=3は「見出し行の何列目を対象にするか」、Criteria1:="完了"は「絞り込みの条件」を表します。複数の条件を組み合わせたい場合は、OperatorとCriteria2を追加します。

Sub SetFilterMultiCondition()
    ' C列が"未完了"または"保留"の行を表示（OR条件）
    Range("A1:C100").AutoFilter Field:=3, Criteria1:="未完了", _
        Operator:=xlOr, Criteria2:="保留"

    ' D列（4列目）が100以上200以下の行を表示（AND条件・数値範囲）
    Range("A1:D100").AutoFilter Field:=4, Criteria1:=">=100", _
        Operator:=xlAnd, Criteria2:="<=200"
End Sub

AI鬼管理山崎

Fieldの数え方は「シートの列番号」ではなく「フィルター対象範囲の中で何列目か」という点に注意してください。A列から始まる範囲ならA列がField:=1になります。

03 REMOVING FILTERS オートフィルターを解除する2つの方法 「矢印ごと消す」のか「絞り込みだけ解除する」のかを区別する

ここが、この記事で最も重要なポイントです。「オートフィルターを解除する」という言葉には、実は2つの異なる操作が存在します。

' パターンA：フィルター機能ごとオフにする（矢印が消える）
Sub RemoveAutoFilterCompletely()
    If ActiveSheet.AutoFilterMode Then
        Range("A1:C100").AutoFilter   ' 引数なしで実行すると、矢印がトグルでオフになる
    End If
End Sub

' パターンB：矢印は残して、絞り込みだけ解除する
Sub ClearFilterCriteriaOnly()
    If ActiveSheet.FilterMode Then
        ActiveSheet.ShowAllData       ' 隠れていた行をすべて再表示する
    End If
End Sub

多くの解説記事では、この2つを厳密に区別せずShowAllDataや引数なしのAutoFilterをそのまま紹介していますが、実務では「担当者が矢印を使い続けたいのか、完全にフィルター機能を終わらせたいのか」によって使い分ける必要があります。

代表菅澤

「フィルターを解除して」という依頼を受けたとき、担当者が本当に求めているのは大抵「絞り込みを外して全部見たい」であって「矢印ごと消してほしい」ではないケースが多いです。言葉だけで判断せず、どちらの操作か確認する癖をつけると事故が減ります。

04 FILTERMODE VS AUTOFILTERMODE FilterModeとAutoFilterModeの違い 「絞り込みが効いているか」と「矢印が出ているか」は別の状態

前章の実行時エラーを防ぐ鍵になるのが、Worksheet.FilterModeとWorksheet.AutoFilterModeという2つのプロパティです。名前が非常に似ているため混同されがちですが、確認している内容はまったく異なります。

Sub SafeClearFilter()
    ' FilterModeを確認してからShowAllDataを呼ぶ = エラーにならない安全な書き方
    If ActiveSheet.FilterMode Then
        ActiveSheet.ShowAllData
    End If
End Sub

このIf ActiveSheet.FilterMode Then ...という1行を入れるだけで、「絞り込みが効いていないときにShowAllDataを呼んでエラーになる」という、非常によくある実行時エラーを未然に防げます。

AI鬼管理山崎

「1回目は動くのに2回目でエラーになる」というマクロの多くは、このFilterModeのチェックが抜けているケースです。この1行を入れる習慣をつけるだけで、フィルター関連のトラブルの大半は解消します。

05 SAFE PATTERN 何度実行してもエラーにならない安全な実装パターン 状態を確認してから操作する、という設計の基本

ここまでの内容を踏まえて、「フィルターを設定し直す」「完全に解除する」という一連の操作を、何度実行してもエラーにならない形でまとめます。

Sub RefreshFilterSafely()
    Dim ws As Worksheet
    Set ws = ActiveSheet

    ' 1. 既存の絞り込みだけ解除（矢印は残す）
    If ws.FilterMode Then
        ws.ShowAllData
    End If

    ' 2. 新しい条件で絞り込みを設定し直す
    ws.Range("A1:C100").AutoFilter Field:=3, Criteria1:="完了"
End Sub

Sub RemoveFilterEntirelySafely()
    Dim ws As Worksheet
    Set ws = ActiveSheet

    ' フィルター機能そのものをオフにする（矢印も消す）
    If ws.AutoFilterMode Then
        ws.AutoFilterMode = False
    End If
End Sub

後者のws.AutoFilterMode = Falseは、Range.AutoFilterを引数なしで呼ぶのと似た効果を持ちますが、「オブジェクト（ワークシート）のプロパティに直接False代入する」形で書けるため、対象のRangeを毎回指定し直す必要がなく、コードが安定しやすいという利点があります。

5-1. Worksheetを明示的に指定する習慣も安定性を高める

もう1つの実務上のコツとして、ActiveSheetに頼りきらず、対象のシートをWorksheets("シート名")のように明示的に指定する書き方も、業務マクロの安定性を高めます。ActiveSheetは「今アクティブになっているシート」を指すため、担当者が別のシートを開いた状態でマクロを実行すると、意図しないシートに対してフィルター操作をしてしまう可能性があります。

Sub SafeClearFilterExplicitSheet()
    Dim ws As Worksheet
    Set ws = Worksheets("集計データ")   ' ActiveSheetに頼らず明示的に指定

    If ws.FilterMode Then
        ws.ShowAllData
    End If
End Sub

「今どのシートを見ているか」という担当者の操作状況に依存しない書き方にしておくことで、誰がどのタイミングでマクロを実行しても同じ結果になるという、業務マクロとして重要な性質が保たれます。

06 COMMON PITFALLS 業務マクロ運用でよくある落とし穴 早見表 専門知識がなくても確認できる観点

非エンジニアの担当者でも、以下の観点で業務マクロのセルフチェックが可能です。

6-1. 「担当者によってフィルターの後片付けが違う」問題も見逃せない

複数の担当者が同じシートを使っている職場では、「使い終わったらフィルターを外す人」と「フィルターをかけたままにする人」が混在するという問題がよく起こります。この「後片付けのバラつき」が、翌日のマクロ実行時のエラーの温床になります。

AIエージェントにマクロの改修を一元化して依頼することの隠れた利点は、こうした「人によって前提となる状態がバラつく」問題そのものを、状態確認のコードで吸収できることです。誰がどんな状態でシートを残していても、マクロ側で状態を確認してから動作するように作っておけば、トラブルが起きません。

代表菅澤

「フィルターをかけたまま退勤する人」と「必ず解除してから退勤する人」が混在していた時期があり、翌朝のマクロ実行でエラーが頻発していました。マクロ側で状態確認をするように直してからは、誰の使い方でも安定して動くようになりました。

07 GENAI CASE STUDY 【独自データ】GENAI社内、業務マクロの改修をClaude Codeにどこまで任せているか 状態確認のガードまで含めた改修を、AIエージェントに依頼する運用

ここからは、弊社（株式会社GENAI）の実運用データを紹介します。弊社ではClaude Max 20xプラン（月額$200・約30,000円）を契約し、経営・営業・広告・開発・経理・秘書業務まで全社的にAIエージェント「Claude Code」を活用しています。

弊社では、既存の業務マクロを改修する際、Claude Codeに「このマクロ、2回目に実行するとエラーになるので直して」といった日本語での依頼をするだけで、内部的にFilterModeやAutoFilterModeの状態確認を含む改修コードを組み立ててもらっています。「どんな状態で実行してもエラーにならないか」まで含めて自動的にチェックしてもらうのが、弊社の標準的な運用です。

この運用の利点は、「決め打ちの前提でコードを書いてしまう」という、経験のあるVBA担当者でも意識しないと見落とす落とし穴を、AIが標準的な対策（状態確認のガード処理）を踏まえた上で回避してくれる点にあります。人間が「こういう時にエラーになる」という現象を伝えるだけで、実装の細部と品質管理はAIに任せられます。

代表菅澤

以前は「エラーの原因がフィルターの状態にある」と気づくまでに時間がかかることがありました。今はClaude Codeに現象を伝えるだけで、FilterModeの確認漏れだと数分で特定してもらえるので、改修のスピードが大幅に上がっています。

AI鬼管理山崎

弊社がマクロ改修を請け負う案件でも、「このコードは複数の状態パターンでテスト済みか」をチェック項目にしています。1回のテストで動いたからといって安心せず、状態確認の抜けがないかを必ず見るようにしています。

7-1. 「起きている現象」を伝えるだけで済む依頼の仕方

弊社の実務では、マクロ改修に関する依頼のほとんどが「何が起きて、どう困っているか」を一言で伝えるだけで完結しています。「2回目の実行でエラーになる」「フィルターを解除したはずなのに動きがおかしい」といった、非エンジニアでも自然に使える言葉で十分にAIへ意図が伝わります。

08 CONCLUSION まとめ ── 「状態を確認してから操作する」が業務マクロの安定性を決める 技術の詳細を知らなくても、リスクは管理できる

この記事では、VBAでオートフィルターを設定・解除する基本的な方法から、FilterModeとAutoFilterModeの違い、何度実行してもエラーにならない安全な実装パターン、そして弊社GENAIがAIエージェント「Claude Code」を使ってマクロ改修をどう運用しているかを紹介しました。最後にポイントを振り返ります。

「フィルターを解除する」という操作は一見単純ですが、その裏側には「今、シートがどんな状態にあるか」を確認せずに操作してしまうという、経験のあるVBA担当者でも見落としやすい落とし穴が潜んでいます。技術の詳細を全て理解する必要はありませんが、「状態を確認してから操作する」という考え方を知っているだけで、改修の依頼の質が上がります。

代表菅澤

弊社では「AI鬼管理」というサービスで、Claude Codeを使った業務マクロの改修・業務自動化の仕組みづくりを支援しています。「マクロが時々エラーで止まって困っている」という悩みがあれば、お気軽にご相談ください。

小さなエラーを放置せず、状態確認まで含めて早めに改善する習慣を持つことが、業務マクロの安定性を守る確実な一歩です。

「時々エラーになる」業務マクロ、AIで安定した仕組みに作り直しませんか？

フィルター関連のエラー修正から、状態確認ガードの追加・業務プロセス全体の自動化まで。
Claude Codeを使った「何度実行しても安定するマクロ」の作り方を、実例ベースでご提案します。

AI鬼管理山崎

「マクロが時々エラーになるが、原因がわからない」という職場ほど、AIエージェントの活用効果は大きく出ます。無料相談で、貴社の業務マクロの改善ポイントを一緒に洗い出しましょう。

ここから先の進め方は、大きく2つあります。

自社で回せるようになりたい方は、AI鬼管理でClaude Code／Codexの使い方から業務設計・社内定着まで伴走を受けながら、社内に仕組みを作る道があります。

覚えるより任せたい方は、AI社員AIKATAでこの記事のような定型業務を丸ごと預ける道があります。料金は月30万円の月額定額、追加費用は0円です。

どちらが合うかは、業務量と社内体制次第です。無料相談・無料適合診断で、貴社の場合はどちらが向くかからご相談いただけます。

NEXT STEP

この記事の内容を、あなたのビジネスで
実践してみませんか？

AI活用を自社で回せるようになりたい方へ

AI鬼管理

Claude Code・Cowork導入支援から業務設計・社内浸透まで実践ベースで伴走。「自社で回せる組織」を90日で作る経営者向けトレーニング。

AI鬼管理を詳しく見る →

業務を丸ごと任せたい方へ

AI社員AIKATA

請求処理・データ入力・問い合わせ対応などの定型業務を、AI×人の品質管理体制で丸ごと代行。月30万円の定額でまかせ放題、日々は成果物を承認するだけ。

AI社員AIKATAを詳しく見る →

よくある質問

Q. ShowAllDataを実行すると「実行時エラー1004」が出ます。原因は何ですか？

A. FilterModeがFalse、つまり「現在絞り込み条件が何も効いていない」状態でShowAllDataを実行すると、このエラーが発生します。実行前に「If ActiveSheet.FilterMode Then ShowAllData」のように状態を確認してから呼び出すことで回避できます。

Q. AutoFilterModeとFilterModeの違いが分かりにくいです。もう少し具体的に教えてください。

A. AutoFilterModeは「フィルターの矢印（ドロップダウン）が表示されているか」を示し、FilterModeは「実際に絞り込み条件によって行が非表示になっているか」を示します。矢印は出ていても絞り込みは効いていない、という状態もあり得るため、両者は別々に確認する必要があります。

Q. オートフィルターで複数条件（AND・OR）を指定する方法は？

A. 1つ目の条件をCriteria1、2つ目の条件をCriteria2に指定し、Operator引数にxlAnd（両方満たす）またはxlOr（どちらか満たす）を指定します。例：Range("A1:C100").AutoFilter Field:=3, Criteria1:="A", Operator:=xlOr, Criteria2:="B"

Q. マクロを2回目に実行するとエラーになるのはなぜですか？

A. 1回目の実行でフィルターの状態（絞り込みの有無など）が変化し、2回目の実行時にはコードが想定していた状態と食い違っていることが主な原因です。ShowAllDataやAutoFilterの呼び出し前に、必ず現在の状態（FilterMode・AutoFilterMode）を確認する書き方に直すことで解決します。

Q. 非エンジニアでも、マクロのフィルター関連エラーの原因を特定する依頼はできますか？

A. できます。「2回目に実行するとエラーになる」「フィルターを解除したはずなのに動きが変わらない」といった、実際に見えている現象を伝えるだけで十分です。原因の特定（FilterModeの確認漏れ等）はClaude CodeのようなAIエージェントに任せることができます。

Q. Claude Codeに業務マクロの改修を依頼する場合、専門知識は必要ですか？

A. 不要です。「このマクロ、2回目の実行でエラーになる」といった感覚的な言葉で伝えるだけで、Claude CodeがFilterModeやAutoFilterModeの確認漏れを特定し、修正コードを日本語で説明してくれます。最終確認・承認だけ人間が行う運用で十分に回せます。

監修 最終更新日: 2026年9月14日

菅澤 孝平 株式会社GENAI 代表取締役

• AI業務自動化サービス「AI鬼管理」を運営 — Claude Code を活用し、経営者の業務を「AIエージェントに任せる仕組み」へ転換するパーソナルトレーニングを 伴走構築 で提供。日報・採用・問い合わせ対応・経費精算・議事録・データ集計・営業リスト等の定型業務を、AIに代行させる体制を経営者と一緒に作り込む
• Claude Code 実装ノウハウを 経営者・法人クライアント に直接指導。生成AIを「便利ツール」ではなく 「業務を任せる存在」 として運用する手法を体系化
• 「やらせ切る管理」メソッドの開発者。シンゲキ株式会社（2021年設立・鬼管理専門塾運営）にて累計3,000名以上の学習者を志望校合格に導いた管理メソッドを、AI × 経営者支援 に転用
• 著書『3カ月で志望大学に合格できる鬼管理』(幻冬舎)、『親の過干渉こそ、最強の大学受験対策である。』(講談社)
• メディア出演: REAL VALUE / カンニング竹山のイチバン研究所 / ええじゃないかBiz 他
• 明治大学政治経済学部卒

現在は AI鬼管理（Claude Code活用の伴走型パーソナルトレーニング）を主事業とし、経営者と二人三脚で「AIに業務を任せる仕組み」を実装。「実行を強制する環境」を AI で構築する手法を、自社の実運用知見をもとに発信している。

▸ 代表 菅澤孝平 のプロフィール詳細を見る