Когда Тед вводит дату только с месяцем и днем, то есть 4/5, дата отображается 5 апреля, а числовой формат — Пользовательский. Однако, когда он вводит 5 мая 2018 года, отображается 5 мая 2018 года, а числовой формат — Дата. Тед задается вопросом, как он может получить дату в формате 4/5/2018, когда он вводит только 4/5, без необходимости форматировать ячейки до даты перед вводом. Другими словами, он хочет, чтобы дата по умолчанию была Дата, а не Пользовательская.

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

чтобы использовать нужный формат даты перед вводом даты, или вы должны явно отформатировать столбец (или ячейки) после ввода даты.

Есть одно решение на основе макросов, но оно может быть излишним. Все, что вам нужно сделать, это добавить этот обработчик событий в окно кода для рабочего листа. (Щелкните правой кнопкой мыши вкладку рабочего листа и выберите «Просмотреть код» в появившемся контекстном меню. Вставьте этот короткий макрос в появившееся окно кода.)

Private Sub Worksheet_Change(ByVal Target As Range)

If IsDate(Target) Then         Target.NumberFormat = "m/d/yyyy"

End If End Sub

Макрос проверяет все, что вы вводите в ячейку, и если определено, что это дата (это цель функции IsDate), то к ячейке применяется желаемый формат даты.

Я упоминал, что это может быть немного излишним, потому что вам, очевидно, нужно будет сохранить книгу как книгу с поддержкой макросов. Однако, если это не проблема для вашего использования книги, это может решить ваши потребности в форматировании даты.

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

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

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

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

Этот совет (13553) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365.