備忘録
Dim oXls As Excel.Application = New Excel.Application() 'エクセルを開く
Dim oWBook As Excel.Workbook
Dim oSheet As Excel.Worksheet
oWBook = oXls.Workbooks.Open(xlsPath) 'ブックを開く
oSheet = oWBook.Sheets("Sheet1") 'シートを選択
oSheet.Cells.Clear() 'シート内全部クリア
oWBook.Save() '保存
oWBook.Close() 'ブックを閉じる
oXls.Quit() 'エクセルを閉じる