>>663
ReDim ary3(EndRow) がおかしい
最小限直すなら ReDim ary3(1)