vbscriptにはpushがないので、先人の知恵を拾ってくる必要があります。 http://www.songmu.jp/riji/archives/2008/07/vbscriptpush.html いやー!楽ちんですよ!感謝感激! わざわざRedimしてちゃいけないですね。 ところで、配列をコピーするときは単純に代入し、消すときはEraseを使います。 Dim ary1, ary2 ary1 = Array(1,2,3,4,5) 'コピー ary2 = ary1 '消去 Erase ary1 参照ではないのでary1を消してもary2は消えません。