[[20130515112150]]　『全てのシートの同じ行をオートフィルしたい』（・ω・）　ページの最後に飛ぶ

『全てのシートの同じ行をオートフィルしたい』（・ω・）

全てのシート(シート名：1hから31h　の３２枚分)
の同じ行（A3からBE3）までをオートフィルかけたいのですが、
この場合VBAで出来るのでしょうか？
出来なくても別の方法で、
オートフィルを全てのシートの同じ行に出来るのでしょうか・・？

 「オートフィル」じゃなくて「オートフィルタ」ですよね？

 Sub オートフィルタ()

     Dim ws As Worksheet

     For Each ws In Worksheets
        ws.Range("A3:BE3").AutoFilter
     Next

 End Sub

 (se_9)

わああああすみません！
てっきりフィルタと書いてたと思ってました・・！

感謝です(>_<)！

(･ω･)

コメント返信：