- package require tcom
- set pfile "d:/上海市、上海/123.csv"
- set excel [::tcom::ref createobject "excel.application"]
- set workbooks [$excel Workbooks]
- set workbook [$workbooks add]
- set worksheets [$workbook Worksheets]
- set worksheet [$worksheets Item "Sheet1"]
- $workbook SaveAs $pfile
- $excel Quit
出错信息:
- 0x800a03ec {Microsoft Office Excel 不能访问文件“D:\//ad/上海市、上海/0C45CE30”
- 。 可能的原因有:
- ? 文件名称或路径不存在。
- ? 文件正被其他程序使用。
- ? 您正要保存的工作簿与当前打开的工作簿同名。}
解决方法:
- regsub -all {\/} $pfile {\\} pfile