KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как преобразовать дату в формат серийного номера в Excel?

АвторСуньДата изменения
преобразовать дату в порядковую дату
Как известно, в Excel дату можно форматировать различными способами, например как 1/1/2016, 1-янв-16 и т.д. Однако пробовали ли вы когда-нибудь преобразовать дату в порядковую Формат даты, как показано на снимке экрана ниже? На самом деле в Excel отсутствует прямой способ форматирования даты в виде порядковой Формат даты. Но не беспокойтесь: в этой статье описаны приёмы выполнения Преобразовать дату в серийную дату формата в Excel.

Преобразовать дату в серийную дату формат с помощью формулы
Преобразовать дату в серийную дату формат с помощью Kutools для Excel
Преобразовать дату в серийную дату формат с помощью определённой функции
Преобразование количественных числительных в порядковые с помощью Kutools для Excel хорошая идея3

синяя стрелка вправо с пузырёмПреобразовать дату в серийную дату формат с помощью формулы

Вот формула, которая поможет вам преобразовать дату в порядковый формат.

Выберите пустую ячейку рядом с датой, которую нужно преобразовать в порядковый формат даты (например, C2), и введите следующую формулу:
=DAY(A2)&IF(OR(DAY(A2)={1,2,3,21,22,23,31}),CHOOSE(1*RIGHT(DAY(A2),1),«st»,«nd »,«rd »),«th»)&TEXT(A2,«mmmm, yyyy»)
Затем нажмите клавишу Enter и перетащите маркер автозаполнения на ячейки, в которых требуется преобразовать дату в порядковый формат. См. снимок экрана:
Преобразование даты в формат порядковой даты с помощью формулы

Теперь даты успешно преобразованы в порядковый формат.

Примечание: В формуле A2 — это дата, которую вы хотите преобразовать в порядковый номер; при необходимости её можно изменить.


синяя стрелка вправо с пузырём Преобразовать дату в серийную дату формат с помощью Kutools для Excel

Kutools для Excelпредлагает более 300 расширенных функций для упрощения сложных задач, повышая креативность и эффективность.Интегрировано с возможностями ИИ, Kutools автоматизирует задачи с высокой точностью, делая управление данными простым и удобным.Подробная информация о Kutools для Excel…         Бесплатная пробная версия…

После бесплатной установкиKutools для Excel выполните следующие действия:

В инструменте Kutools для ExcelПомощник формул можно использовать функцию Преобразовать дату в серийную дату для быстрого преобразования даты Excel в порядковую.

1. Выберите ячейку для размещения порядковой даты и щёлкните Kutools > Помощник формул > Дата и время > Преобразовать дату в серийную дату.
нажмите функцию «Преобразовать дату в порядковую дату» Kutools

2. В диалоговом окне Помощник формул выберите или введите ссылку на ячейку в разделе Дата. По умолчанию ссылка на ячейку является абсолютной; если вы планируете использовать маркер автозаполнения для применения формулы к другим ячейкам, измените её на относительную.
выберите ссылку на ячейку в диалоговом окне

3. Нажмите кнопку ОК. Теперь дата преобразована в порядковую. Выделите ячейку с результатом и перетащите маркер автозаполнения на нужные ячейки, чтобы применить эту формулу.
дата была изменена на порядковую дату; перетащите маркер автозаполнения по ячейкам


синяя стрелка вправо с пузырёмПреобразовать дату в серийную дату формат с помощью определённой функции

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

1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. Щёлкните Вставка > Модуль и вставьте приведённый ниже код в скрипт.

Код: преобразование даты в порядковую

Function OrdinalDate(xDate As Date)
'UpdatebyExtendoffice20160705
    Dim xDay As Integer
    Dim xDayTxt As String
    Dim xMonth As Integer
    Dim xMonTxt As String
    Dim xYear As Long
    
    xDay = Day(xDate)
    xMonth = Month(xDate)
    xYear = Year(xDate)
    
    Select Case xDay
        Case 1: xDayTxt = "st"
        Case 2: xDayTxt = "nd"
        Case 3: xDayTxt = "rd"
        Case 21: xDayTxt = "st"
        Case 22: xDayTxt = "nd"
        Case 23: xDayTxt = "rd"
        Case 31: xDayTxt = "st"
        Case Else: xDayTxt = "th"
    End Select

    xMonTxt = Switch(xMonth = 1, " January", _
                     xMonth = 2, " February", _
                     xMonth = 3, " March", _
                     xMonth = 4, " April", _
                     xMonth = 5, " May", _
                     xMonth = 6, " June", _
                     xMonth = 7, " July", _
                     xMonth = 8, " August", _
                     xMonth = 9, " September", _
                     xMonth = 10, " October", _
                     xMonth = 11, " November", _
                     xMonth = 12, " December")
    OrdinalDate = xDay & xDayTxt & xMonTxt & " " & xYear
End Function

скопируйте и вставьте код в модуль

3. Сохраните код и закройте окно VBA. Вернитесь на лист, выберите ячейку для размещения преобразованной даты и введите формулу =OrdinalDate(J2), затем нажмите клавишу Enter и перетащите маркер заполнения на нужные ячейки. См. снимок экрана:
введите формулу для получения результата

Совет: в формуле J2 — это дата, которую вы хотите преобразовать в порядковую; при необходимости её можно изменить.


синяя стрелка вправо с пузырём Преобразование количественных числительных в порядковые с помощью Kutools для Excel

В большинстве случаев вам может понадобиться преобразовать число в порядковое при ранжировании. В Excel отсутствует встроенная функция для этого, но если у вас установлена Kutools для Excel — удобная надстройка, то её утилита Преобразовать число в порядковое поможет вам в этом.

Выделите числа, которые нужно преобразовать в порядковые, и нажмите Kutools > Содержимое > Преобразовать число в порядковое. См. снимок экрана:
Преобразование количественного числа в порядковое с помощью Kutools

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек