时间：2018-03-31 22:18作者：admin来源：未知人气：623我要评论(0)
有时我们在Excel中制作的工作表需要反复修改，并保存为多个版本。修改的次数多了，很容易混淆。如果能把工作簿的最后保存日期和时间显示在工作表的某个单元格或页眉页脚中，查看起来就非常方便了。用VBA代码就能够轻松地实现这一点，方法如下：
1.按Alt+F11，打开VBA编辑器。
2.在“工程”窗口中，双击“ThisWorkBook”，在右侧的代码窗口中输入下列代码：
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.Range("G3").Value = Format(Now, "yyyy年m月d日 hh:mm:ss")
End Sub
说明：上述代码将工作簿保存的日期和时间保存在活动工作表的“G3”单元格中，需根据实际进行修改。如果要将保存的时间放到页眉或页脚中，可以改为类似下面的代码，下例中将工作簿的保存日期和时间放到页脚右侧：
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.PageSetup.RightFooter = "修改时间：" & Format(Now, "yyyy年m月d日 hh:mm:ss")
End Sub
3.关闭VBA编辑器，回到Excel界面中。以后每次单击工具栏中的“保存”按钮，G3单元格或页眉页脚中就会显示当前保存的日期和时间。
相关阅读 你想学的FILTER函数用法，很全了当Excel体积臃肿，运行卡顿时，我们应该做些什么？带合并单元格的表格，求和计数也不难Excel筛选条件怎么设置ExcelA4页面怎么设置Excel表格A列被隐藏了怎么恢复Excel图例位于底部怎么设置Excel图表怎么嵌入单元格Excel没保存不小心关闭怎么恢复Excel图表怎么设置X轴Y轴
热门文章
excel怎么制作表格？制作excel表格的步骤技巧
excel 常见的六个排序方法，你必须要学会
excel自动换行显示不全怎么办
excel 数据透视表 选定区域不能分组 的原因和解决方法
最新文章
你想学的FILTER函数用法，很全了
当Excel体积臃肿，运行卡顿时，我们应该做些什么？
带合并单元格的表格，求和计数也不难Excel筛选条件怎么设置ExcelA4页面怎么设置Excel表格A列被隐藏了怎么恢复
人气排行 excel怎么制作表格？制作excel表格的步骤技巧excel 常见的六个排序方法，你必须要学会excel自动换行显示不全怎么办excel 数据透视表 选定区域不能分组 的原因和解决方法Excel高级筛选怎么用 excel高级筛选多个条件（并且、或用法）excel if函数的多个条件使用方法Excel中的快速填充键ctrl+e没反应，不能用是为什么？excel 判断两列数据是否一致的四种方法
盖楼回复X
(您的评论需要经过审核才能显示)
查看所有0条评论>>