如何在 Excel 中將日期格式化為大寫的月份?
在 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 或增益集方案。
注意事項與提示:
- 若要同時顯示月份與年份(例如大寫的 JAN 24),請在目標儲存格(例如 C2)中輸入下列公式:
- 若要以大寫顯示完整月份名稱(例如 JANUARY):
- 輸入所需公式後,務必按下 Enter,並利用填滿控點將公式快速套用至整個日期範圍!
- 若您的日期未被識別為有效的 Excel 日期(例如以文字形式輸入),公式將無法傳回正確結果。請務必確認原始資料已設定為日期格式。
=UPPER(TEXT(A2,"mmm YY")) 
=UPPER(TEXT(A2,"mmmm")) 使用 Kutools for Excel 將日期格式化為大寫月份
應用日期格式工具由 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 的安全性設定未停用或封鎖巨集。
最佳 Office 生產力工具
| 🤖 | KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行 | 產生程式碼| 建立自訂公式 | 分析資料並產生圖表| 呼叫增強函數…… |
| 熱門功能:尋找、醒目提示或標記重複值 | 刪除空白行 | 合併列或儲存格而不遺失資料 | 不使用公式的四捨五入…… | |
| 高級 LOOKUP:多重條件 VLookup | 多重數值 VLookup | 跨多個工作表 VLookup | 模糊查找…… | |
| 高級下拉列表:快速建立下拉式清單 | 相依式下拉式清單 | 多選下拉式清單…… | |
| 欄位管理員:新增指定數量的欄位|移動欄位|切換隱藏欄位的可見狀態|比較範圍與欄位…… | |
| 精選功能:網格聚焦 | 設計視圖 |增強編輯欄 | 工作簿與工作表管理員 | 資源庫(自動文字)| 日期提取 | 合併工作表 | 加密/解密儲存格 | 依清單傳送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體儲存格/斜體/刪除線……) ...... | |
| 頂尖 15 工具組:12 文字工具(添加文本,刪除特定字符,……)| 50+ 圖表 類型(甘特圖,……)| 40+ 實用公式(基於生日計算年齡,……)| 19 插入工具(插入二維碼,從路徑插入圖片,……)| 12 轉換工具(金額轉大寫,匯率轉換,……)| 7 合併和拆分工具(高級合併行,分割儲存格,……)|……以及更多 |
運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……
Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!
- 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
- 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
- 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!
所有 Kutools 增益集,一個安裝程式
Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!
- 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
- 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
- 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
- 30 天完整功能試用— 無需註冊,無需信用卡
- 超值之選— 比單獨購買各增益集更省費用