別のブックのマクロを実行(Run メソッド)
別のブックのマクロを実行
別のブックのマクロを実行するには、Run メソッド を使用します。( ※ 参照設定を行うと、Call ステートメント でも 別ブックのマクロを呼び出すことができます。詳細は、プロシージャを呼び出す(Call ステートメント を参照してください。)
【書式】
object.Run ( macro [, arg1, arg2, … , arg29, arg30 ] )
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- macro ・・・ 実行するマクロを指定します。ブックが開いている時やカレントフォルダのブックの場合は、「ブック名!マクロ名」のように、マクロ名の前には、「!」(エクスクラメーションマーク)を付けます。また、ブックが閉じている場合は、「‘パス+ブック名’!マクロ名」のように、パスを含めたブック名を「’」(シングルクォーテーション)で囲み、マクロ名の前には、「!」を付けて指定します。
- arg1 … arg30 ・・・ 引数を指定します。(省略可)
- object ・・・ 対象となる Application オブジェクトを指定します。
- macro ・・・ 実行するマクロを指定します。ブックが開いている時やカレントフォルダのブックの場合は、「ブック名!マクロ名」のように、マクロ名の前には、「!」(エクスクラメーションマーク)を付けます。また、ブックが閉じている場合は、「‘パス+ブック名’!マクロ名」のように、パスを含めたブック名を「’」(シングルクォーテーション)で囲み、マクロ名の前には、「!」を付けて指定します。
- arg1 … arg30 ・・・ 引数を指定します。(省略可)
Run メソッド 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
Sub Sample01_Run() 'mybook.xlsm が閉じている場合 Dim BookName As String BookName = "C:\Documents\mybook.xlsm" 'パスは、「'」で囲む / マクロ名の前に「!」をつける Application.Run "'" & BookName & "'" & "!mybook_Macro1" End Sub Sub Sample02_Run() 'mybook.xlsm が開いている場合 'マクロ名の前に「!」をつける Application.Run "mybook.xlsm!mybook_Macro1" End Sub |
|
1 2 3 4 5 6 7 |
Sub mybook_Macro1() MsgBox ThisWorkbook.Name & " のマクロを実行" End Sub |
実行結果

関連記事
-
-
分割したウィンドウの取得(Panes コレクション,Pane オブジェクト)
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
数式を表示(DisplayFormulas プロパティ)
数式を表示(DisplayFormulas プロパティ) セルに数式が入力されて …
-
-
スクロール範囲を限定(ScrollArea プロパティ)
ScrollArea プロパティ ScrollArea プロパティ にセル範囲を …
-
-
ブックのパスを取得(FullName プロパティ,Path プロパティ)
FullName プロパティ・Path プロパティ ブックのパス(保存場所)を調 …
-
-
指定したセル範囲が含まれるワークシートを参照する(Worksheet プロパティ)
Worksheet プロパティ Worksheet プロパティは、指定したセル範 …
-
-
ユーザー設定のビュー(CustomViews プロパティ)
ユーザー設定のビュー CustomViews コレクションは、ユーザー設定ビュー …
-
-
Excel を全画面表示(DisplayFullScreen プロパティ)
DisplayFullScreen プロパティ DisplayFullScree …
-
-
共有ファイルを開いているユーザー情報を取得(UserStatus プロパティ)
共有ファイルを開いているユーザー情報を取得 UserStatus プロパティは、 …
-
-
ウィンドウを拡大・縮小(Zoom プロパティ)
ウィンドウを拡大・縮小(Zoom プロパティ) ウィンドウの表示サイズをパーセン …
-
-
選択されているシートを参照する(SelectedSheets プロパティ)
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …