Обычно даты, используемые 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 в интерактивной справочной системе.

Следует отметить, что даты, добавленные в верхние или нижние колонтитулы таким образом, не являются динамическими, как результат кода [ДАТА]. Когда вы используете макрос для вставки даты, она вставляется как текстовая строка. Если позже вы захотите изменить дату на другую (например, текущую дату), вам нужно будет повторно запустить макрос.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (2188) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и новее) здесь:

link: / excelribbon-Specifying_Date_Formats_in_Headers [Указание форматов даты в заголовках].