Обычно даты, используемые Excel в верхних и нижних колонтитулах (с кодом [ДАТА]), основаны на региональных настройках, контролируемых Windows. Таким образом, если в ваших локальных настройках дата отображается в определенном формате в самой Windows, это тот же формат, который Excel будет использовать в верхних и нижних колонтитулах.
Это может быть недостатком, если вам необходимо поддерживать определенный тип формата системной даты для совместимости с другими системами в вашем офисе, но вам необходимо использовать другой формат даты в верхнем или нижнем колонтитуле определенного рабочего листа. Единственный способ решить эту проблему – либо изменить региональные настройки в Windows, либо вернуться к использованию макроса для установки соответствующей области вашего верхнего или нижнего колонтитула.
Например, допустим, вы хотели установите правый заголовок равным текущей дате в формате m/d/yy. Для этого вы можете использовать очень простой макрос, например следующий:
Sub HeaderDate () ActiveSheet.PageSetup.RightHeader = Format (Date, «m/d/yy») End Sub
Чтобы использовать это, просто запустите его, и он добавит дату в указанном формате в правую часть заголовка. Если вы хотите, чтобы информация была добавлена в другое место в нижнем колонтитуле или верхнем колонтитуле, вы просто замените часть макроса RightHeader одним из следующих элементов: LeftFooter, CenterFooter, RightFooter, LeftHeader или CenterHeader.
Чтобы изменить формат добавления даты, просто измените формат, используемый в функции «Формат». Для свидания можно использовать всевозможные узоры; информацию о функции форматирования в VBA можно найти в интерактивной справочной системе.
Обратите внимание, что даты, добавленные в верхние или нижние колонтитулы таким образом, не являются динамическими, как результат кода [ДАТА] . Когда вы используете макрос для вставки даты, она вставляется как текстовая строка. Если позже вы захотите изменить дату на другую (например, текущую дату), вам нужно будет повторно запустить макрос.
Источник: