Excel 打开文档历史记录 - 插件

Question

如果这最终是通用的，请提前道歉。我对此做了一些研究，完全空白。

Excel 很棒，我喜欢 Excel。以至于“最近的文档”部分对我来说几乎没有用处，因为我在大量的位置使用了那么多电子表格。

我一直在研究一种在打开文档时记录（使用 VBA 作为插件）文档的方法。即使它像带有日期的文本文件一样简单，但是我无法弄清楚如何在打开文件时让 VBA 代码“知道”（与输出到文本文件一起，这就是我想要的它在这个阶段做）。

有没有办法让 VBA 从 excel 实例中查找此操作？

Answer 1

以下步骤（改编自 http://www.cpearson.com/excel/AppEvent.aspx 的优秀帖子）是满足您需要的“最低限度可行”方式。

1. 打开一个新工作簿
2. 打开 VB 编辑器
3. 插入一个类模块；在属性窗口中，将类名设置为CExcelEvents
4. 在类模块中添加如下代码：

私有 WithEvents 应用程序作为应用程序 私有子类_Initialize() 设置应用程序 = 应用程序 MsgBox "初始化类！" 结束子 Private Sub App_WorkbookOpen(ByVal Wb As Workbook) MsgBox "新工作簿已打开：" & Wb.Name 结束子

5. 在项目资源管理器中右键单击“ThisWorkbook”元素，然后选择“查看代码”
6. 添加以下代码：

Private XLApp As CExcelEvents

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

这会创建一个 CExcelEvents 类的实例，并在加载插件时“打开事件处理”。

最后，将文件另存为 myEvents.xlam 在存储插件的位置 - 这取决于您的机器...

如果您现在关闭文件并添加插件（同样，取决于您的环境，无论是来自开发者功能区还是工具菜单），您应该会看到一个对话框，上面写着“已初始化类！”。这表明插件已正确安装并正常工作。

现在，当您打开工作簿时，会出现另一个消息框：“新工作簿已打开：”，名称为。

显然，您将希望摆脱消息框，并放入一些“有用”的代码来执行您想做的任何事情（例如，将工作簿的名称记录到文件中）。在我看来，后者不需要帮助 - 如果我错了，请告诉我。