如何批量为Excel G列指定数字单元格首字符后添加逗号

方法一：用公式快速处理 #

不用写代码，直接靠文本函数就能批量搞定：

• 找个空白列（比如H列），在H2单元格输入公式：
  =LEFT(G2,1)&","&RIGHT(G2,LEN(G2)-1)
• 回车后下拉填充到H485，就能得到所有处理好的内容
• 如果要把结果替换回G列，选中H2:H485复制，右键点击G2，选「选择性粘贴」→「值和数字格式」就行

要是担心有单个数字的单元格（比如内容是"5"），可以用带判断的公式避免出现多余逗号：
=IF(LEN(G2)>=2,LEFT(G2,1)&","&RIGHT(G2,LEN(G2)-1),G2)

方法二：VBA宏自动化处理 #

之前录宏只改了操作过的单元格，是因为录制时没设置遍历范围，改成循环遍历目标区域即可：

1. 按Alt+F11打开VBA编辑器
2. 右键左侧的工作簿名称，选「插入」→「模块」
3. 粘贴下面的代码：

Sub AddCommaAfterFirstChar()
    Dim cell As Range
    '遍历G2到G485的所有单元格
    For Each cell In Range("G2:G485")
        '只处理长度≥2的数字单元格
        If IsNumeric(cell.Value) And Len(cell.Value) >= 2 Then
            cell.Value = Left(cell.Value, 1) & "," & Right(cell.Value, Len(cell.Value) - 1)
            cell.NumberFormat = "@" '设置为文本格式，防止逗号被自动格式化
        End If
    Next cell
End Sub

4. 按F5运行宏，或者回到Excel界面，点「开发工具」→「宏」，选择AddCommaAfterFirstChar执行就行

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