VBAで関数を使用し、関数で可変長の引数を使用します。
【手順】
1.「標準モジュールの作成方法」の手順で、「MainModule」とい標準モジュールを作成。
2.「MainModule」を以下の様に入力。
Option Explicit
Sub main()
Call func1("aaa")
Call func1("aaa", "bbb", "ccc")
Call func1(1, 2, 3)
End Sub
Private Sub func1(ParamArray args() As Variant)
Dim i As Integer
Debug.Print ("関数が呼び出されました。")
For i = LBound(args) To UBound(args)
Debug.Print ("args(" & i & ")=" & args(i))
Next
End Sub
3.「関数を実行する方法」の手順で、main関数を実行。4.イミディエイトウィンドウが表示されない場合は、「イミディエイトウィンドウの表示方法」でイミディエイトウィンドウを表示させます。
5.以下の様に、イミディエイトウィンドウに以下の様に、出力されれば成功です。
以上です。

0 件のコメント:
コメントを投稿
注: コメントを投稿できるのは、このブログのメンバーだけです。