Question

如何让EXCEL自动记录在哪一天打印过该文件？

我是要用本地文件自动记录。

要把当前文件所有的打印记录显示在某个工作薄。

Answer 1

只能察看打印机的历史纪录

1. 在你的打印机的属性中的安全中打开高级选项，在审核中点击添加按钮，添加你要查看的对象。如：对用户XXX。
2. 在开始—>运行中输入mmc后按回车键。
3. 控制台的菜单下选择添加/删除管理单元中添加组策略。
4. 打开本地组策略，配置“本地计算机”策略下的计算机配置下的本地策略下的审核策略下的审核对象访问，审核成功或失败的对象访问。
5. 经过这两个方面的设置后，现在就可以在事件查看器中查看打印的历史记录啦！

Answer 2

打开文件后按ALT+F11
双击THISWORKBOOK添加下面的代码
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("sheet2").[A65536].End(xlUp).Offset(1, 0) = Now 'sheet2可以换成任何你用来记录打印记录的工作表名，各记录从A2开始依次向下排列
ThisWorkbook.Save '保存工作表,该操作会导致对文件所做的任何修改无法恢复，请酌情使用。
End Sub

然后最重要的1点是要让你的宏在打开文件时自动启用。
方法就是在vba编辑器中给vba工程添加一个“数字签名”
添加后第一次打开文件时选择信任该签名，以后再打开文件就不会有宏提示了。

关于数字签名，请搜索“vba 数字签名”教程。

Answer 3

Private Sub Workbook_BeforePrint(Cancel As Boolean)
[a1] = Now
End Sub

在a1记录最近一次打印的时间。