Question

每当我的页面打印在左上角打印日期和左下角打印页码时，我都希望这样。

如何使用excel中的head命令完成此操作。

Head =“日期值”

和

Foot =“页码”

我知道还有其他方法可以做到这一点，但我被要求使用这些功能。

Answer 1

With ActiveSheet.PageSetup
  .LeftHeader = Format(Now(), "dd/mm/yy")
  .LeftFooter = "%P"
End With

Answer 2

With ActiveSheet.PageSetup
  .LeftHeader = Format(Now(), "dddd, mmmm dd, yyyy")                                     ' Saturday, July 13, 2019
  .LeftFooter = "Page " & ActiveSheet.Index & " of " & ActiveSheet.PageSetup.Pages.Count ' Page 1 of 2
End With

日期格式-> https://powerspreadsheets.com/vba-format-date/#Format-Date-Using-VBA-Display-Several-Items-Of-The-Date

Excel VBA在页眉和页脚中打印日期和页码

2 个答案: