如何阻止Excel编辑单元格时将文本格式转为自定义(mmm-yy)格式

针对你遇到的Excel替换后自动转日期的问题，以下几种批量处理方法可以避免格式转换，保留纯文本的05-4422：

方法1：用公式提取（适合中小批量数据） #

核心是通过公式直接提取下划线后的内容，避免触发Excel的自动格式转换：

• 先在空白列（比如B列）设置单元格格式为文本（右键→设置单元格格式→文本）
• 在B1单元格输入公式：=TEXT(MID(A1,FIND("_",A1)+1,LEN(A1)),"@")
  • 解释：FIND("_",A1)定位下划线位置，MID提取下划线后的所有字符，TEXT(..., "@")强制结果为文本格式
• 下拉填充公式到所有需要处理的行
• 选中B列，右键复制，再右键选择「粘贴值」，即可得到纯文本格式的目标内容

方法2：用Power Query批量处理（适合大量数据，无代码） #

Power Query会以纯文本方式处理数据，不会自动转换格式：

1. 选中需要处理的数据区域，点击顶部「资料」选项卡→「从表格/区域」（Mac版路径），导入Power Query编辑器
2. 在编辑器界面，点击「添加列」→「自定义列」，输入公式：Text.AfterDelimiter([你的列名], "_")（把「你的列名」替换成实际列标题，比如「数据」）
3. 删除原始数据列，保留新生成的自定义列
4. 点击「关闭并上载」，选择将结果导出到新工作表或覆盖原数据（建议先备份原数据）
5. 导出的结果默认保持文本格式，不会转为日期

方法3：VBA宏一键处理（适合超大量数据） #

用VBA直接操作单元格，先强制设置文本格式再修改内容：

1. 打开Excel，按Opt+F11打开VBA编辑器（Mac版）
2. 点击「插入」→「模块」，粘贴以下代码：

Sub RemovePrefix()
    Dim rng As Range
    Dim cell As Range
    Set rng = Selection ' 选中需要处理的单元格区域再运行宏
    For Each cell In rng
        If cell.Value <> "" Then
            cell.NumberFormat = "@" ' 先设置为文本格式
            cell.Value = Split(cell.Value, "_")(1) ' 拆分并保留下划线后内容
        End If
    Next cell
End Sub

3. 回到Excel界面，选中所有需要处理的单元格，按F5运行宏即可

注意事项 #

• 不要用Excel的「替换」功能处理这类内容，即使单元格设为文本，替换后的内容符合日期规则时，Excel仍会自动触发格式转换
• 所有操作前建议先备份原数据，避免意外丢失

内容的提问来源于stack exchange，提问作者RichardG