CSV 格式的 Excel 宏

Question

有没有办法以 CSV 文件格式运行 Excel 宏？

我正在使用 csv 模板将文件导出到 CSV，是否可以在 CSV 格式的模板上编写宏。我不能用 XLS 格式。谁可以帮我这个事？

Answer 1

虽然您无法将宏保存在CSV文件中，但您可以

1. 在CSV使用控制器工作簿或插件上运行宏
2. 更进一步，以编程方式将代码添加到CSV文件中（例如添加事件处理程序）

如果您提供有关您需要做什么的更多信息，那么我们可以为上述路径提供帮助。

（编辑：仍然不清楚 CSV 文件是如何生成的 - 这是通过 Excel 还是其他应用程序完成的？]

使用 Pearson 的应用程序事件示例，您可以使用底部的代码（来自打开的 Excel 控制器工作簿）来捕获新CSV文件的添加，然后对其进行格式化。

如果您需要CSV即时捕获文件的创建，则需要更复杂的方法，例如将VBscript 与 WMI 一起使用。

Controller Workbook Approach

本工作簿模块

Private XLApp As CExcelEvents

Private Sub Workbook_Open()
    Set XLApp = New CExcelEvents
End Sub

名为 CExcelEvents 的类模块

Private WithEvents App As Application

Private Sub App_NewWorkbook(ByVal Wb As Workbook)
If Wb.FileFormat = xlCSV Then
MsgBox Wb & " is a Csvfile"
'your code
End If
End Sub

Private Sub Class_Initialize()
    Set App = Application
End Sub