在多个人在同一个工作簿上工作的环境中，您可能需要一种方法来跟踪人们上次更改工作簿的时间。

您可以通过两种方法来完成此任务。一种是简单地找出工作簿的最后保存时间。如果您假设始终保存对工作簿的任何更改，则此方法效果很好。 （当然，未保存的更改实际上根本不是持久的更改。）以下宏返回工作簿的保存日期，并将该日期存储在单元格A1中：

Sub DateLastModified()

Dim fs, f     Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFile("D:\MyFolder\MyFile.xlsx")

Cells(1, 1) = f.DateLastModified End Sub

要使用该宏，只需将D：\ MyFolder \ MyFile.xlsx文件规范替​​换为适合您的文件。

如果您想知道谁对您的工作簿做了什么的历史记录表，则需要使用另一种方法。也许最好的解决方案是尝试使用Excel的共享功能，该功能可以配置为保留工作簿的历史日志。请按照下列步骤操作：

。显示功能区的“审阅”选项卡。

。在“更改”组中，单击“共享工作簿”工具。 Excel将显示“共享工作簿”对话框。

。确保显示“编辑”选项卡。 （请参见图1。）

。选择“允许更改”复选框。

。显示“高级”选项卡。 （请参见图2。）

。确保选中“保留更改历史记录”单选按钮。

。使用对话框中的其他控件，选择要用于工作簿的跟踪选项。

。单击确定。

。在“更改”组中，单击“跟踪更改”工具，然后从子菜单中选择“突出显示更改”。 Excel将显示“突出显示更改”对话框。

。确保选中“在新工作表上列出更改”复选框。

。单击确定。

在对工作簿进行更改时，Excel会跟踪这些更改（以及进行更改的人员）并将它们放在单独的工作表中，以便您以后可以进行查看。

注意：

如果您想知道如何使用此页面（或_ExcelTips_网站上的任何其他页面）中描述的宏，我准备了一个特殊页面，其中包含有用的信息。

点击此处在新的浏览器标签中打开该特殊页面。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（7924）适用于Microsoft Excel 2007、2010和2013。您可以在以下版本的Excel旧菜单界面中找到本技巧的版本：

注意何时更改工作簿。