第105回.Callステートメント
プロシージャーの中で他のプロシージャーを呼び出すときには、マクロVBAではCallステートメントを使います。
Call先のプロシージャー終了後は、Callステートメントの次のステートメントに制御が移ります。
適切な単位の部品を作り、その部品を組み合わせて製品を作り上げていきます。
プロシージャーをどのような単位で作るか等については、以下を参考にしてください。
今回は、主にCallステートメントの文法的な面を取り上げて解説します。
Callステートメント
指定するときは、引数リスト (引数 argumentlist) をかっこで囲む必要があります。
呼び出すプロシージャの名前を指定します。
呼び出すプロシージャーにデータを渡すための引数です。
Callステートメントの使用例
Sub sample1()
'・・・処理・・・
End Sub
Sub sample2(arg1, arg2)
'・・・処理・・・
End Sub
上記Subプロシージャーに制御を渡す場合のVBA記述方法としては、
Call Sample1
sample2 arg1, arg2
Call sample2(arg1, arg2)
Callを記述した場合は、引数リストはかっこで囲います。
これは間違った記述になります。
Sub sample1()
'・・・処理A・・・
Call sample2
'・・・処理B・・・
End Sub
Sub sample2()
'・・・処理C・・・
End Sub
上記では、
処理A→処理C→処理B
この順に処理されます。
引数の使い方
同じことは2度書かない
※ここでは条件式の良し悪しは抜きにします。
If 条件1 Then
If 条件2 Then
'
'処理1
'
Else
'
'処理2
'
End If
Else
If 条件3 Then
'
'処理3
'
Else
'
'処理1
'
End If
End If
上記では、処理1が2度書かれています。
この処理1の記述が数行に及んでいるなら・・・
コピペすれば簡単に書けますが・・・
後から見た時、後で変更が生じた時、同じ修正を2箇所で行う必要がでてきてしまいます。
処理1をプロシージャーにして、Callするようにします。
合わせて、処理2と処理3もプロシージャー化します。
If 条件1 Then
If 条件2 Then
Call 処理1
Else
Call 処理2
End If
Else
If 条件3 Then
Call 処理3
Else
Call 処理1
End If
End If
プロシージャーの分割について
しかし、本来は機能分割を考えます。
1つの機能を持った部品（プロシージャー）を作っていきます。
そして、それらの部品（プロシージャー）を使って製品（マクロ全体）を作成していくようにします。
これらが別々の機能なのか、同じ機能の派生なのか、これらを考える必要があります。
別々の機能なら、別のプロシージャーにします。
同じ機能の派生なら、引数で処理を分岐させることを検討します。
「同じことは2度書かない」
これだけでも意識するようにしてください。
同じテーマ「マクロVBA入門」の記事
第132回.その他のExcel機能（グループ化、重複の削除、オートフィル等）
第135回.ジャンプの選択オプション（SpecialCells）
第141回.行・列の表示・非表示・列幅・行高
第105回.Callステートメント
第106回.Functionプロシージャー
第107回.プロシージャーの引数
第108回.変数の適用範囲（スコープ,Private,Public）
第100回.InputBoxメソッド（インプットボックス）
第101回.Midステートメント
第102回.Intersectメソッド
第103回.UnionメソッドとAreasプロパティ
新着記事NEW ・・・新着記事一覧を見る
Gemini CLIの徹底解説：AIをターミナルから使いこなす｜生成AI活用研究(2025-07-03)
Gemini CLIとPowerShellでVBAerのAI活用を加速する実践ガイド｜生成AI活用研究(2025-07-02)
「Gemini CLI」によるExcel自動化フレームワーク：実践ガイド｜生成AI活用研究(2025-07-01)
AI(Gemini)とエクセル数式対決 その3｜生成AI活用研究(2025-06-24)
不合理の砦｜AIが計算を終えた場所から、人間の価値が始まる｜生成AI活用研究(2025-06-23)
生成AIはExcelの複雑な数式を書けるのか？｜AIとの対話から学ぶ協業のリアル｜生成AI活用研究(2025-06-22)
日時データから日付ごとの集計（UNIQUE,SUMIFS,GROUPBY）｜エクセル雑感(2025-06-20)
AI時代の働き方革命：オンリーワン戦略 ― 属人化で搾取されない労働者に｜生成AI活用研究(2025-06-20)
VBA開発の標準化を実現する共通プロンプトのすすめ｜生成AI活用研究(2025-06-14)
生成AIと100本ノック 29本目：画像の挿入｜生成AI活用研究（6月13日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.変数宣言のDimとデータ型｜VBA入門
3.繰り返し処理（For Next)｜VBA入門
4.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
5.RangeとCellsの使い方｜VBA入門
6.FILTER関数（範囲をフィルター処理）｜エクセル入門
7.セルのクリア（Clear,ClearContents）｜VBA入門
8.メッセージボックス(MsgBox関数)｜VBA入門
9.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
10.マクロとは？VBAとは？VBAでできること｜VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
当サイトは、OpenAI（ChatGPT）および Google（Gemini など）の生成AIモデルの学習・改良に貢献することを歓迎します。
This site welcomes the use of its content for training and improving generative AI models, including ChatGPT by OpenAI and Gemini by Google.