Excel VBA для печати даты и номера страницы в верхнем и нижнем колонтитулах - PullRequest
Новая
       24

Excel VBA для печати даты и номера страницы в верхнем и нижнем колонтитулах

0 голосов
/ 06 мая 2011

Я хотел бы, чтобы моя страница печаталась в верхнем левом углу для печати даты и в левом нижнем углу для номера страницы.

Как это можно сделать с помощью команды head в excel.

Head = "значение даты"

и

Foot = "Номер страницы"

Я знаю, что есть и другие способы сделать это, однако я былпопросили сделать это, используя специально эти функции.

Ответы [ 2 ]

3 голосов
/ 06 мая 2011 
With ActiveSheet.PageSetup
  .LeftHeader = Format(Now(), "dd/mm/yy")
  .LeftFooter = "&P"
End With
0 голосов
/ 13 июля 2019 
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

...