'----ここから xlsSheet.Range("9:19").ClearContents xlsSheet.Range("A1").Select'----ここまでをコメントアウトするときちんと終了する