エクセル保護でのグループ化、フィルタの使用方法

質問

エクセル2007でセルの保護の状態でグループ化の表示切替とオートフィルタを使用する方法を教えてください。
現在ファイル内で特定の列に保護をかけています。

保護により無効となってしまったグループかの表示・非表示はVBAで
切替られるようにしました。

Private Sub Workbook_Open()
With Worksheets("シート名")
.EnableOutlining = True
.Protect UserInterfaceOnly:=True
End With
End Sub

更に、オートフィルタを使用したいのですが、
保護を行う時に「オートフィルタの使用」にチェックを入れているのに
選択が不可能な状態です。

すべての条件を満たすにはどのような方法があるのでしょうか。
お分かりになる方がいられましたらご教授ください。

回答No.1

SakuraiMisato

http://www.moug.net/tech/exvba/0150067.html
http://www.eurus.dti.ne.jp/yoneyama/Excel/vba/vba_autofilter.html
http://excelvba.pc-users.net/fol7/7_5.html
一先ず、上記URLのページを御覧になって下さいませ。