Excel的應用需要加入參考,這方面可以參考:[Excel] 新增/刪除 工作表
程式碼最上面引用
Imports Microsoft.Office.Interop
Dim app As New Excel.Application Dim worksheet As Excel.Worksheet Dim workbook As Excel.Workbook
workbook = app.Workbooks.Open("檔案路徑") '開啟 Excel 檔案 worksheet = workbook.Worksheets("工作表名稱") '選擇要讀取的工作表
worksheet.Cells(1, 1).Interior.Color = RGB(255, 0, 0)'後面就是RGB的顏色碼
workbook.Save() '儲存檔案 workbook.Close() '關閉檔案 app.Quit() '結束操作
RGB顏色碼可以參考以下網站:https://www.w3schools.com/colors/colors_rgb.asp
沒有留言:
張貼留言