【1 OSの種類 　 　 　 　 .】 Windows 7
【2 Excelのバージョン 　 】 Excel 2007
【3 VBAが使えるか　 　 .】 超初心者
【4 VBAでの回答の可否】 是非

いまアクティブセルがある場所の表の
オートフィルターを実行、同時にアクティブセルの
場所の列の空白以外を表示させる、という風にしたいです

「 Range("A1").AutoFilter Field:=1, Criteria1:="<>"」

最初の場所(A1)、それとフィールドの場所を
アクティブセルで取得できるようにしたいのです
どのようにすればいいのかご教授お願いします