在Excel中通過自定義頁腳的方式在頁腳中插入日期時,Excel默認(rèn)將使用短日期格式,如“2009-10-9”,但大家通常習(xí)慣使用“2009年10月9日”這樣的長日期格式。Excel沒有提供直接的方法在頁眉或頁腳中修改日期格式。在工作量不大的情況下,可以在頁眉或頁腳中手工輸入這種長日期格式,但如果工作簿中的工作表數(shù)量較多,逐一手工輸入顯得很繁瑣。用下面的VBA代碼可以快速在所有工作表的頁腳右邊插入長日期格式的當(dāng)前日期:
Sub FormatDateInFooter()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Sheets
ws.PageSetup.RightFooter = "更新日期:" & Format(Date, "yyyy年m月d日")
Next ws
End Sub