2018年10月29日 星期一

VB.Net如何讀寫Excel檔案 含編碼 XLS或是其他格式

Imports Microsoft.Office.Interop


        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

沒有留言:

張貼留言