通過luacom操作excel。網上提供的資料很少，我模仿vba找出了一些基本操作方法。
復制代碼 代碼如下:
require 'luacom'
local excel = luacom.CreateObject('Excel.Application')
excel.Visible = true
local book = excel.Workbooks:Add()
local sheet = book.Worksheets(1)
sheet.Name = 'gty'
local range = sheet:Range('A1:A10')
local cell = sheet.Cells(1,1)
sheet:Range('D3:D6'):Merge()--合并單元格
range.Value2 = 1
range.Font.Size = 20
sheet.Cells(1,2).FormulaR1C1 = '=R3C1+R4C1' --公式
cell.Value2 = 'gty'
cell.Font.Name = 'Arial'
--cell.Font.FontStyle = 'bold'
cell.Font.Bold = true
sheet.Cells(4,5).EntireRow.Interior.Color = 0x334455 --整行操作
sheet.Cells(4,5).EntireColumn.Interior.Color = 0x998877 --整列操作
cell.Font.Size = 20
cell.Font.Color = 0x0000ff
cell.Font.Underline = true
cell.Font.Strikethrough = true --刪除線
cell.font.OutlineFont = true --下劃線
range.Interior.Color = 0x778899 --區域上色
range.Borders.LineStyle = 1 --邊框樣式 --每個小的內邊框
sheet:Range('C2:G7').BorderAround(1)--外邊框
--range.Borders.Weight = 4 --邊框寬度
--range.Interior.Pattern = 8 --區域花紋
--cell.Font.Shadow = true
--cell.Font.SuperScript = true
--cell.Font.SubScript = true
print(range.Cells.Count) --統計單元格數
print(range.Rows.Count)
print(range.Columns.Count)
range.NumberFormat = '$#,##0.00' --格式化數字
sheet:Range('A2'):Cut() --剪切
sheet:Range('A3'):Copy() --復制
sheet:Paste(sheet:Range('B3')) --粘貼
book.Worksheets('sheet3'):Delete()
book:SaveAs(filePath,51)--51xlsx -4143xls
excel:Quit()
以上就是代碼的全部內容了，希望大家能夠喜歡。
您可能感興趣的文章:- Lua教程（五）：C/C++操作Lua數組和字符串示例
- Lua中的操作符和表達式總結
