全てのワークシート上で同じ処理を一度に行うには？ (ID:105630)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Dim ws As Variant For Each ws In Sheets Sheets(ws.Name).Range("A1", "B2").Value = "" Next For文の中身をTTさんの処理にすれば これでできると思いますよ。 ちなみにこれは全ワークシートの A1,A2,B1,B2のセルの値を初期化してます。