セル指定後マクロ実行ボタンでオートフィルタ実行

表－１の氏名に応じた各日付に記号が入力されています。 下表の記号に日付ごとの記号合計個数が式によって入力されています。 記号の個数の値セル（E17）をアクティブし選出ボタンをクリックしたらその行記号（B17⇒"B")のみがオートフィルタで表－２のように選出表示したいのですが？ VBAでどなたかお解りになる方よろしくお願いします。