それ以前にロジックおかしいだろ
OPEN何回するんだ
ForNext使うような処理か
ランダムにする必要があるのか