摘要： 在Excel中通过自定义页脚的方式在页脚中插入日期时，Excel默认将使用短日期格式，如“2009-10-9”，但大家通常习惯使用“2009年10月9日”这样的长日期格式。Excel没有提... 在Excel中通过自定义页脚的方式在页脚中插入日期时，Excel默认将使用短日期格式，如“2009-10-9”，但大家通常习惯使用“2009年10月9日”这样的长日期格式。Excel没有提供直接的方法在页眉或页脚中修改日期格式。在工作量不大的情况下，可以在页眉或页脚中手工输入这种长日期格式，但如果工作簿中的工作表数量较多，逐一手工输入显得很繁琐。用下面的VBA代码可以快速在所有工作表的页脚右边插入长日期格式的当前日期：
excel中利用VBA保护工作表或撤消工作表保护
在Excel中要对工作表进行保护，可以通过单击菜单“工具→保护→保护工作表”的方法来进行。如果要用VBA来保护工作表或撤消工作表保护，可以用下面的代码： Public Sub Protect_Sheet()‘保护工作表，设置密码为“password&r
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中使用非连续区域
如果要在VBA中使用非连续区域，可以用类似Range("A1, B2, C3:D10")的语句，如下例： Sub NonContiguousRange()Dim oRng As RangeSet oRng = Range("A1, B2, C3:D10")oRng.Value =
