Как добавить только текущий месяц и год в заголовок книги Excel?

1224
rtinstruct

Мне нужно ввести текущий год в заголовок и добавить название листа в качестве дня (например, 2 / [Tab] / [YYYY]). Это возможно? Я знаю, что опция « Вставить дату» помещает динамическую дату в заголовок, но мне нужно иметь возможность контролировать месяц вручную, если это возможно.

Любые предложения будут ценны.

0
Одним из способов является использование подпрограммы VBA, и вы можете установить разделы заголовка по своему усмотрению. Макрос может быть запущен вручную или вызван событием Workbook_BeforePrint в зависимости от ваших требований. Ron Rosenfeld 6 лет назад 0

1 ответ на вопрос

0
PeterH

Это можно сделать с помощью VBA.

Сначала введите приведенную ниже формулу CELL A1, ее можно изменить на любую ячейку, которую вы хотите, просто убедитесь, что вы изменили контрольную точку в части макроса.

=DAY(TODAY())&"/"&MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)&"/"&YEAR(TODAY())

Это создаст вашу динамическую комбинацию даты и имени листа.

Затем поместите ниже в модуль:

Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.CenterHeader = Range("A1").Value End Sub

Он возьмет комбо даты и установит его в заголовок перед печатью.

Оно также должно вступить в силу перед просмотром предварительного просмотра.

Питер, я обязательно попробую! Я предполагаю, что это не сработает, если файл в основном используется в онлайн-приложении Excel? rtinstruct 6 лет назад 0
@rtinstruct, дайте мне знать, как вы справляетесь с этим, что касается онлайн, я не уверен, так как я никогда не использовал онлайн-сервисы для Excel. PeterH 6 лет назад 0
Почему бы не получить имя листа напрямую, используя собственные методы VBA? Ron Rosenfeld 6 лет назад 1

Похожие вопросы