end ifの前にredim preserve 検索値(i)は?