在Excel中通过自定义页脚的方式在页脚中插入日期时,Excel默认将使用短日期格式,如“2009-10-9”,但大家通常习惯使用“2009年10月9日”这样的长日期格式。Excel没有提供直接的方法在页眉或页脚中修改日期格式。在工作量不大的情况下,可以在页眉或页脚中手工输入这种长日期格式,但如果工作簿中的工作表数量较多,逐一手工输入显得很繁琐。用下面的VBA代码可以快速在所有工作表的页脚右边插入长日期格式的当前日期:
Excel中的个人宏工作簿Personal.xls(b)
一、什么是个人宏工作簿(Personal.xls)个人宏工作簿是一个自动启动的Excel文件,在Excel2003中个人宏工作簿的名称为Personal.xls,在Excel2007中默认为Personal.xlsb。用这个Excel文件可以保存经常使用
Sub FormatDateInFooter()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Sheets
ws.PageSetup.RightFooter = "更新日期:" & Format(Date, "yyyy年m月d日")
Next ws
End Sub
excel VBA常用快捷键一览
F2对象浏览器F4属性窗口F5运行子过程/用户窗体F7代码窗口F8逐语句执行代码F9设置/取消断点Ctrl Shift F9清除所有断点Ctrl G立即窗口Ctrl R工程窗口Shift F8逐过程执行代码Shift F10显示右