摘要： 有时我们在Excel中制作的工作表需要反复修改，并保存为多个版本。修改的次数多了，很容易混淆。如果能把工作簿的最后保存日期和时间显示在工作表的某个单元格或页眉页脚中，查看起来就非常方便了。用VBA代码就能够轻松地实现这一点，方法如下：
1.按Alt F11，打开VBA编辑器。
2.在“工程”窗口中，双击“ThisWorkBook”，在右侧的代码窗口中输入下列代码：
excel利用VBA打开或禁止单元格拖放（自动填充）功能
Excel中的单元格拖放或自动填充功能可以给我们的操作带来许多方便，但有时我们并不想拖动单元格而出现意外的错误操作。这时可能需要禁用单元格的拖放功能，除了可以通过Excel选项来设置
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单元格或页眉页脚中就会显示当前保存的日期和时间。
excel利用VBA判断工作表是否存在
下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在，如果指定的工作表不存在，则以指定的工作表名新建一个工作表，如果指定的工作表已存在，则给出一个提示，并激活该工作表
