結果 : exit while loop excel vba