如何在Excel2013/2016/2019中转换mmddyy文本为标准日期格式

本文将详细介绍如何利用Excel的不同工具和功能，将非标准的mmddyy日期文本转换成标准的mm/dd/yyyy格式。无论您使用的是Excel 2013、2016还是2019，以下方法都能帮助您轻松完成转换。

### 使用公式转换mmddyy文本为日期

如果您有一系列以mmddyy格式存储的日期数据，可以使用Excel中的DATE、MID和RIGHT函数组合来转换这些文本。具体公式如下：

=DATE(RIGHT(A1,4), LEFT(A1,2), MID(A1,3,2))

输入上述公式后，按下Enter键，并通过拖拽填充柄将其应用于其他单元格。

### 利用分列功能转换mmddyy文本为日期

除了使用公式，Excel还提供了“分列”功能，可以方便地将日期文本转换为日期格式。操作步骤如下：

1. 首先，选择包含日期文本的单元格范围，如A1:A4。
2. 接着，切换至“数据”选项卡，点击“文本分列”按钮，启动“文本分列向导”。
3. 在向导中选择“固定宽度”作为数据类型，点击“下一步”。
4. 选择适当的分隔点，然后点击“下一步”。在“列数据格式”中选择“日期”，并在下拉菜单中选择“MDY”格式。
5. 最后，指定目标单元格，点击“完成”按钮，即可看到转换后的日期。

### 通过VBA宏实现mmddyy文本到日期的转换

对于需要频繁进行此类转换的用户，编写一个简单的VBA宏可能是更为高效的选择。以下是具体的步骤：

1. 打开Excel工作簿，点击“开发工具”选项卡下的“Visual Basic”按钮，或直接按“Alt + F11”快捷键打开VBA编辑器。
2. 在VBA编辑器中，选择“插入” -> “模块”来创建一个新的模块。
3. 将以下VBA代码复制并粘贴到新模块中：

Sub ConvertDate() Dim rng As Range, cell As Range Set rng = Application.InputBox("请选择一个范围:", "转换mmddyy为日期", Type:=8) For Each cell In rng cell.Value = DateSerial(Right(cell.Value, 4), Left(cell.Value, 2), Mid(cell.Value, 3, 2)) cell.NumberFormat = "mm/dd/yyyy" Next End Sub 

4. 保存并关闭VBA编辑器，返回Excel界面。
5. 运行刚才创建的宏，选择需要转换的单元格范围，如A1:A4，点击“确定”。
6. 检查转换后的结果，确保所有日期都已正确转换为所需的格式。

### 相关Excel函数简介

• DATE函数: 返回特定日期的序列号。语法为：=DATE(year, month, day)
• MID函数: 从文本字符串的指定位置返回指定长度的子字符串。语法为：=MID(text, start_num, num_chars)
• LEFT函数: 从文本字符串的左侧返回指定数量的字符。语法为：=LEFT(text, [num_chars])
• RIGHT函数: 从文本字符串的右侧返回指定数量的字符。语法为：=RIGHT(text, [num_chars])