perl - 如何最有效地自动化重复的 Excel 任务？

Question

我想使用 Perl 自动化 Excel 来执行以下任务:

For a list of Excel .xls files, do the following:
  Open the file
  Set Format to CSV
  Save the file under the original filename and directory, but replace the extension "xls" with "csv"
  Close the file
End

我找到了如何打开文件，甚至如何保存它们。我没有找到如何更改文件格式/另存为其他格式。不应弹出用户对话框，它应该是完全自动化的。我可以自己生成的 Excel 文件列表、参数化的“查找”或“目录”就足够了。

Answer 1

如果您使用 Excel 自动化，Excel 本身就是一个很大的帮助。使用 VBA 环境 (Alt+F11) 获取您要使用的 Excel 对象的帮助。

objectbrowser (F2) 非常有值(value)。

Workbook.SaveAs([Filename], [FileFormat], [Password], [WriteResPassword], [ReadOnlyRecommended], [CreateBackup], [AccessMode As XlSaveAsAccessMode = xlNoChange], [ConflictResolution], [AddToMru], [TextCodepage], [TextVisualLayout], [Local])

在对象浏览器中搜索 CSV 将显示 Excel 常量及其值，因为您可能无法在 Perl 中使用这些 Excel 常量。