Excelの便利な機能の1つは、オートフィルターです。これにより、特定の列の内容でリストをすばやくフィルタリングできます。 [ツール]メニューの[カスタマイズ]オプションを使用して、ツールバーにオートフィルターツールを追加できます。このツールは、じょうごの画像と等号を使用します。

ただし、このツールは少し欺瞞的です。これは、[データ]メニューから使用できる[オートフィルター]オプションと同じではありません。リストでセルを選択し、メニューオプションを選択した場合、オートフィルターコントロールはリストの各列の上部に表示されます。リストに他の変更はありません。オートフィルターツールを使用すると、コントロールが表示されるだけでなく、Excelはツールの使用時に選択したセルに基づいてリストをフィルター処理します。

2つの違いは、オートフィルターメニューオプションがトグルのように機能することです。一度選択すると、オートフィルターが適用されます。もう一度選択すると削除されます。 AutoFilterツールはそれを行いません。オートフィルターのみを適用します。

メニューオプションのように、実際のトグルであるツールバーオプションが必要な場合はどうなりますか？この問題を解決するために使用できるアプローチは2つあります。

1つ目は、単純なマクロの使用です。

Sub ToggleAutoFilter()

On Error GoTo errMessage     Selection.AutoFilter     Exit Sub

errMessage:

MsgBox "Select a cell in the range to be filtered.", vbOKOnly End Sub

マクロをツールバーボタンまたはショートカットキーに割り当てるだけで、メニューからオプションを選択した場合と同じように、オートフィルターのオンとオフを切り替えることができます。

2番目のオプションはさらに簡単かもしれません。次の手順に従ってください：

。 [ツール]メニューから[カスタマイズ]を選択します。 Wordは、[カスタマイズ]ダイアログボックスを表示します。

。 （[カスタマイズ]ダイアログボックスではなく）実際のExcelメニューで、[データ]メニューから[フィルター]オプションを選択します。

。 Ctrlキーを押しながら、メニューからAutoFilterオプションをドラッグし、ツールバーのどこかにドロップします。 （Ctrlキーを押さないと、メニューオプションが移動します。これを望まないので、Ctrlキーを押したままにします。）

。 [カスタマイズ]ダイアログボックスの[閉じる]ボタンをクリックします。

その結果、メニューオプションにツールバーからアクセスできるようになりました。

それをクリックすると、オートフィルターのオンとオフを自由に切り替えることができます。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（2710）は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。

linkTogglingAutoFilter。