我正在尝试以这种格式 YYYY-MM-DD hh:mm:ss 在 excel 的特定单元格中分配日期值,我使用 TCL 打开 excel 并解析值,最后将值推送到 excel 中的单元格,最后将其保存为CSV格式,
例如,当我尝试将 2012-09-10 00:00:00 分配给 excel 中的特定单元格时,我看到 excel 将其转换为 9/10/2012 0:00。有没有办法从 TCL 关闭 excel 中的自动格式化选项?
这是我的示例代码:
proc get_date { } {
set date "2012-09-10 00:00:00"
return $date
}
set application [::tcom::ref createobject "Excel.Application"]
set workbooks [$application Workbooks]
$application DisplayAlerts False
set workbook [$workbooks Open "c:\\test\\dir\\filename.csv"]
set worksheets [$workbook Worksheets]
set worksheet [$worksheets Item [expr 1]]
set cells_worksheet1 [$worksheet Cells]
$cells_worksheet1 Item 5 B [get_date]
$workbook Save
$application Quit