複数のシートにまたがるマクロの記述方法

質問

複数のシートにまたがるマクロって書けるのでしょうか？自動記録でマクロを作ってチビチビ編集しているのですが、シートを指定したマクロが書けません。4枚のシートがセットで連動しているのですが、一度のマクロの実行ボタンで全てを順序良く実行させたいのです。
ご存知の方教えてください。

回答No.2

KenKen_SP · ベストアンサー

こんにちは。KenKen_SP です。

下記のようにシート名を指定します。

EX) Sheets("シート名").Range("A1").Value = "ABC"

>...一度のマクロの実行ボタンで全てを順序良く実行させたいのです

Call でマクロを呼び出します。次の例ではマクロ「Main」を実行する
と Macro1、Macro2、Macro3 の順でマクロを実行していきます。

Sub Main()

　　Call Macro1
　　Call Macro2
　　Call Macro3

End Sub

お礼

呼び出して順序良く実行できそうです。助かりました。どうもありがとうございました。

回答No.1

hana-hana3

＞シートを指定したマクロが書けません。

Worksheets("シート１").Activate
マクロ文
Worksheets("シート２").Activate
マクロ文
Worksheets("シート３").Activate
マクロ文

とするだけですが？

マクロの自動記録で、シートの切り替えを行ってもきちんとシートの切り替えが記録されますよ。

お礼

よく見ると記述されていました。見逃していました。どうもありがとうございます。