質問です。Excel 2016で、Autofilerされたシートの内容を参照するために

（wsはワークシートオブジェクトです）
Debug.Print ws.AutoFilterMode　　　　　→この結果は True
Debug.Print ws.AutoFilter.FilterMode　 →この結果も True
Dim rgFilter As Range
Set rgFilter = ws.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible)

For Each e In rgFilter
　　Debug.Print e
Next e

こんな感じで参照しようとしてるんですが、
参照してるシートでフィルターが掛かっていても、いなくても
同じように全件（25行なら25行）がイミディエイトに表示されます。
絞り込まれた結果のみを表示するためにはどうしたら良いのでしょうか？