Dim app As New Excel.Application 'app 是操作 Excel 的變數
Dim worksheet As Excel.Worksheet 'Worksheet 代表的是 Excel 工作表
Dim workbook As Excel.Workbook 'Workbook 代表的是一個 Excel 本體
workbook = app.Workbooks.Add() '建立一個空 Excel (裡面有三張工作表)
worksheet = workbook.Worksheets("工作表1") '讀取其中一張工作表
workbook.SaveAs(Path.GetFullPath(XXXXX, 18)
workbook.Close()
'workbook.Close(True, Path.GetFullPath(XXXXXX), True) '操作完畢後一定要關閉檔案
app.Quit() '結束操作
編碼參考
https://docs.microsoft.com/zh-tw/dotnet/api/microsoft.office.interop.excel.xlfileformat?view=excel-pia