第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 ・・・新着記事一覧を見る
新旧マスタの差異比較｜Power Query（M言語）入門(2023-02-28)
有効な最新単価の取得｜Power Query（M言語）入門(2023-02-26)
有効な最新単価の取得｜Power Query（M言語）入門(2023-02-21)
グルーブ内の最小・最大｜Power Query（M言語）入門(2023-02-17)
2つのテーブルのマージ｜Power Query（M言語）入門(2023-02-15)
「売上」が数値の行のみ取り込む｜Power Query（M言語）入門(2023-02-13)
A列のヘッダー名を変更する｜Power Query（M言語）入門(2023-02-11)
CSVのA列が日付の行だけを取り込む｜Power Query（M言語）入門(2023-02-10)
列数不定のCSVの取り込み｜Power Query（M言語）入門(2023-02-09)
別ブックの最終シートの取り込み｜Power Query（M言語）入門(2023-02-08)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.変数宣言のDimとデータ型｜VBA入門
4.繰り返し処理（For Next)｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.マクロって何？VBAって何？｜VBA入門
7.並べ替え（Sort）｜VBA入門
8.Excelショートカットキー一覧｜Excelリファレンス
9.エクセルVBAでのシート指定方法｜VBA技術解説
10.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。