Sub 実行途中で変数を引き継いで他のVBAプログラムを実行する()

    '複数プログラムを組み合わせて作成時に便利
    
    引き継ぎたい値 = 99
    
    Call 途中ではさむ処理(引き継ぎたい値) '()内に持っていきたい変数を入力

End Sub

Sub 途中ではさむ処理(ByRef 引き継ぎたい値) '変数名は実は任意、2個以降は順番で割振

    MsgBox 引き継ぎたい値

End Sub