如何在其他列之间插入列 (Perl Spreadsheet::WriteExcel)

Question

假设我有以下电子表格，可以在 perl 中解析，如下所示：

我想在 Column1 和 Column2 之间插入一列。所以最终结果如下所示：

Spreadsheet-WriteExcel 中似乎没有为此设置方法。

有谁知道在 Perl 中执行此操作的简单方法吗？

提前谢谢了！

Answer 1

唯一（*）Spreadsheet::WriteExcel可以做的就是编写电子表格。它没有任何用于读取现有电子表格的设施。使用它来修改现有电子表格需要首先使用其他方法（例如Spreadsheet::ParseExcel）读取它，然后按照您想要的方式使用数据编写一个全新的电子表格。请注意，如果您尝试此操作，您将丢失宏、图形和任何其他Spreadsheet::WriteExcel不支持的功能。

文档Spreadsheet::WriteExcel涵盖了许多替代方案。请参阅WRITING EXCEL FILES和MODIFYING AND REWRITING EXCEL FILES部分。Win32::OLE例如，您可以完全访问 Excel 的内部结构，并获得 Microsoft API 所期望的所有功能和易用性。我将让您来判断这些方法是否符合“简单”的条件。

(*) - 我的意思并不是不好的。可以编写电子表格的 Perl 模块非常酷。