KutoolsforOffice — 一套方案，五大工具。事半功倍。

如何在 Excel 中将日期设置为序列号格式？

作者孙修改日期
将日期转换为序数日期
众所周知，您可以在 Excel 中将日期设置为多种格式，例如 1/1/2016、1-Jan-16 等。但您是否尝试过将日期转换为如下图所示的序数格式日期格式？实际上，Excel 并未提供直接将日期格式化为序数格式日期格式的功能。不过请放心，本文将为您介绍在 Excel 中实现日期转为序列日期格式的几种技巧。

使用公式实现日期转为序列日期格式
使用 Kutools for Excel 实现日期转为序列日期格式
使用自定义函数实现日期转为序列日期格式
使用 Kutools for 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 for Excel 实现日期转为序列日期格式

Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

安装免费版 Kutools for Excel 后，请按以下步骤操作：

Kutools for Excel 的公式助手工具中，您可以使用日期转为序列日期功能，快速将 Excel 日期转换为序数格式。

1. 选择一个用于放置序数日期的单元格，点击 Kutools > 公式助手 > 日期和时间 > 日期转为序列日期。
点击 Kutools 的“将日期转换为序数日期”功能

2. 在公式助手对话框中，将单元格引用填入日期区域。默认情况下，单元格引用为绝对引用；若希望使用自动填充柄将公式应用到其他单元格，请将其改为相对引用。
在对话框中选择单元格引用

3. 点击确定，日期即转换为序数格式。选中结果单元格，向下拖动自动填充柄，即可将此公式应用到其他单元格。
日期已更改为序数日期，拖动自动填充柄覆盖这些单元格

蓝色右箭头气泡使用自定义函数实现日期转为序列日期格式

此外，您还可以通过自定义函数将标准日期轻松转换为序数日期。

1. 按下 Alt + F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。

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 for Excel 将基数转换为序数

在大多数情况下，您可能希望在排名时将数字转换为序数格式。Excel 中没有内置函数可直接实现此功能，但如果您安装了 Kutools for Excel——这款便捷的插件工具，即可使用其转换数字为序数功能轻松实现！

选中要转换为序数的数字，然后点击 Kutools > 内容 > 转换数字为序数。参见截图：
通过 Kutools 将基数转换为序数

最佳办公效率工具

🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能：查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP：多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表：快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能：网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库（自动文本）|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选（筛选粗体单元格/斜体/删除线……） ......
精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）|   50+ 图表 类型（甘特图，……）|   40+ 实用公式（基于生日计算年龄，……）|   19 插入工具（插入二维码，从路径插入图片，……）|   12 转换工具（小写金额转大写，汇率转换，……）|   7 合并和拆分工具（高级合并行，分割单元格，……）|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！

使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for 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 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱