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

如何在 Excel 中将日期格式化为大写月份？

作者Siluvia修改日期

在 Excel 中处理日期时，有时您可能需要将月份部分以大写字母形式显示（如 ）JAN 或 JANUARY），以提升可读性、满足报告标准或特定格式要求。例如，将一系列日期（如 01/15/2024）转换为对应的大写月份文本。Excel 并未提供直接显示大写月份的内置格式，但通过几种实用方法，您可轻松实现这一效果。本文为您介绍多种高效解决方案，助您在 Excel 中将日期格式化为大写月份，包括公式方法、使用 Kutools for Excel 以及利用 VBA 实现自动转换。立即参考以下指南，为您的场景选择最合适的方法！

使用公式将日期格式化为大写月份
使用 Kutools for Excel 将日期格式化为大写月份
使用 VBA 代码将日期格式化为大写月份

使用公式将日期格式化为大写月份

公式是提取和显示 Excel 日期组成部分的便捷方式。以下方法可使用内置公式将日期转换为大写月份缩写或全名。如果您希望结果出现在新单元格中并具备动态格式（即原始日期更改时，输出自动更新），此方法非常实用。

1. 在要格式化为大写月份的日期旁选择一个空白单元格（例如 ）C2），然后在编辑栏中输入以下公式：

=UPPER(TEXT(A2,"mmm"))

按下 Enter 后，所选单元格将显示大写的三位字母月份缩写（例如 SEP）。

2. 要将此格式应用到其他行，请保持单元格 C2 处于选中状态，然后向下拖动填充柄（单元格右下角的小方块），直至日期列表末尾。每个日期现在都会显示为其对应的大写月份缩写。

将公式拖动并填充到其他单元格

当您处理需要标准化月份名称格式的报告、汇总表或仪表板时，此方法尤其有用。

  • 优势：该解决方案具备动态性——源日期一旦更改，结果将自动更新，无需加载项或高级技能。
  • 局限性：结果会存储在单独的列中，而非原始位置。如需就地格式化（即直接覆盖原始值），建议使用 VBA 或加载项方案。

注意事项与技巧：

  1. 如果要显示带年份的大写月份（例如 JAN 24），请在目标单元格（例如 C2）中使用以下公式：
    2. =UPPER(TEXT(A2,"mmm YY"))

    应用公式将日期格式化为带年份的大写月份

  2. 若要显示大写的完整月份名称（例如 JANUARY）：
    3. =UPPER(TEXT(A2,"mmmm"))
  3. 输入所需公式后，请始终按 Enter，然后使用填充柄将其应用到整个日期范围。
  4. 如果您的日期未被识别为有效的 Excel 日期（例如以文本形式输入），公式将无法返回正确结果。请确保源数据已设置为日期格式。

使用 Kutools for Excel 将日期格式化为大写月份

Kutools for Excel 的应用日期格式工具可灵活、快速地将日期转换为任意所需格式（包括大写月份）。此方法适合偏好图形界面而非编辑公式的用户，轻松实现就地设置单元格格式或快速自定义日期外观。

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

1. 选择要转换为大写月份的日期单元格，然后点击 Excel 功能区上的 Kutools> 格式> 应用日期格式。（如果未显示 Kutools 选项卡，请确保其已安装并启用。）

2. 在应用日期格式对话框中，从日期格式下拉框中选择所需的日期格式，然后点击确定确认。

在日期格式框中指定适当的日期格式

完成后，所选单元格将根据您的设置显示月份缩写或完整月份名称。

所选日期已格式化为月份或月份与年份数字

  • 优势：Kutools 方法操作直观，无需公式即可轻松上手，更能快速处理大范围数据。
  • 提示：应用日期格式后，结果仍为日期，可直接用于其他计算或进一步格式化。

如果您想免费试用（30 天）此工具，请点击此处下载，然后按照上述步骤操作即可。

使用 VBA 代码将日期格式化为大写月份

如果您需要自动且就地转换（用对应的大写月份名称替换原始日期值），或希望在不使用辅助列的情况下快速处理大型数据集，可使用 VBA 宏。此方法在批量操作中极为高效，并可完全控制输出格式。

适用场景：如果您希望覆盖原始数据、自动化转换流程，或在不借助额外列或手动操作的情况下高效处理大量单元格，请使用此方法。

注意事项：运行此宏会将原始日期替换为大写月份名称，导致单元格中的原始日期数据永久丢失。建议您在执行前务必备份数据，以免造成不可逆的损失！

1. 点击开发工具>Visual Basic，即可打开 VBA 编辑器。在 Microsoft Visual Basic for Applications 窗口中，点击插入> 模块，并将以下代码复制粘贴到模块中：

Sub ConvertDatesToUppercaseMonths()
    Dim WorkRng As Range
    Dim Cell As Range
    Dim OutputType As Integer
    Dim Msg As String
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select the range of dates to convert", xTitleId, WorkRng.Address, Type:=8)
    
    Msg = "Enter 1 for 3-letter month (JAN), 2 for full month name (JANUARY):"
    OutputType = Application.InputBox(Msg, xTitleId, 1, Type:=1)
    
    For Each Cell In WorkRng
        If IsDate(Cell.Value) Then
            If OutputType = 2 Then
                Cell.Value = UCase(Format(Cell.Value, "mmmm"))
            Else
                Cell.Value = UCase(Format(Cell.Value, "mmm"))
            End If
        End If
    Next
End Sub

2. 要使用该宏，请点击运行按钮运行按钮，然后在弹出的对话框中选择目标日期单元格范围。系统将提示您选择 1（例如 JAN）或 2（例如 JANUARY）。确认后，宏将按指定方式把原始日期值替换为大写月份名称。

  • 优势：可高效转换整列或区域的排序；支持灵活选择（缩写或完整月份）；在大型数据集上运行迅速；直接覆盖原始值，省去繁琐的手动清理工作。
  • 局限性：原始日期值将被覆盖——如需保留原始数据，请务必提前备份。工作簿必须启用宏。
  • 故障排除提示：如果宏似乎未执行任何操作，请确认所选区域包含有效日期，并确保宏已启用且未被 Excel 安全设置阻止。

最佳办公效率工具

🤖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 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱