您可以使用以下VBA代码来在Excel中的每个单元格的第一个单词后面添加逗号:
1、按下Alt + F11键打开Excel的Visual Basic编辑器。

2、在"模块"窗格中,单击"模块"并在新窗栣中粘贴以下代码:
Sub AddCommaAfterFirstWord()
Dim rng As Range
Dim cell As Range
Set rng = Selection
For Each cell In rng
cell.Value = Split(cell.Value, " ")(0) & ", " & Mid(cell.Value, InStr(cell.Value, " ") + 1)
Next cell
End Sub
3、按下F5键或单击"运行"按钮来运行代码。
4、选择要更改的单元格范围,并运行代码。
希望这能帮到您!