オートフィルタの青い三角が見づらい・・ - OKWAVEイベントマクロを使えば可能ですが... http://oshiete1.goo.ne.jp/qa2305999.html △ここを参考にしたり、または以下。 AutoFilterの色づけしたい対象シートがSheet1だとします。 それとは別に作業用シートを準備します。 その作業用シート任意の１セルに数式を設定します。（たとえばA1） =SUBTOTAL(3,Sheet1!A:A) あとは、その作業用シートのシートモジュールのCalculateイベントを使います。 （作業用シートのシートタブ右クリック[コードの表示]で表示されるモジュールに 以下コピーペースト） 'SheetModule Option Explicit Private Sub Worksheet_Calculate() Static r As Range Dim f As Filter Dim i As Long On
