Add メソッド (VBA)

Collection オブジェクトにメンバーを追加します。

構文

object.Additem, key, before, after

Add メソッドの構文には、以下のオブジェクト修飾子および名前付き引数があります。

指定項目 説明
object 必須です。 評価結果が [適用先] リストのオブジェクトになるオブジェクト式です。
item 必須です。 コレクションに追加するメンバーを指定する任意の型のです。
key 省略可能。 コレクションのメンバーにアクセスするために位置インデックスの代わりに使用できるキー文字列を指定する一意の文字列式です。
before 省略可能。 コレクション内の相対位置を指定する式です。 追加されるメンバーは、before引数によって識別されたメンバーの前のコレクション内に配置されます。 数式の場合、before には、1 以上からコレクションの Count プロパティ値までの数値を指定する必要があります。 文字列式の場合、before は参照されているメンバーがコレクションに追加されたときに指定された key 引数に対応している必要があります。 before 位置または after 位置を指定できますが、両方とも指定することはできません。
after 省略可能。 コレクション内の相対位置を指定する式です。 追加するメンバーは、after 引数によって識別されたメンバーの後のレクション内に配置します。 数式の場合、after には、1 以上からコレクションの Count プロパティ値までの数値を指定する必要があります。 文字列の場合、after は、参照されているメンバーがコレクションに追加されたときに指定される key 引数に対応している必要があります。 before 位置または after 位置を指定できますが、両方とも指定することはできません。

解説

before 引数と after 引数は、文字列式であっても数式であっても、コレクションの既存のメンバーを参照している必要があります。参照していない場合はエラーが発生します。

指定した key がコレクションの既存のメンバーの key と重複している場合もエラーが発生します。

この例では、 Add メソッドを使用して、キーの有無にかかわらず、コレクションに文字列を追加 します Item メソッドは、各文字列を取得するために暗黙的に使用されます。

Dim c As Collection
Set c = New Collection

c.Add "a"
c.Add "c", "CC"
c.Add "b", "BB", 2
c.Add "d"

Debug.Print c(1) ' --> prints "a"
Debug.Print c(2) ' --> prints "b"
Debug.Print c(3) ' --> prints "c"

Debug.Print c("BB") ' --> prints "b"
Debug.Print c("d") ' --> error (no key was specified for this element - a positional index must be used)

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。