如何在Excel中添加名字和姓氏之间的空格？

这里有一个需要添加空格来分隔的名字列表，如下图所示。你如何快速解决这个问题呢？

使用自定义函数在名字和姓氏之间添加空格

使用Kutools for Excel在名字和姓氏之间添加空格

使用自定义函数在名字和姓氏之间添加空格

要在名字和姓氏之间添加空格，您只能使用自定义函数来解决此问题。

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块，并将以下代码粘贴到空白脚本中。

代码：在名字之间添加空格

Function AddSpaces(pValue As String) As String
'UpdatebyExtendoffice20160908
Dim xOut As String
xOut = VBA.Left(pValue, 1)
For i = 2 To VBA.Len(pValue)
xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
If xAsc >= 65 And xAsc <= 90 Then
xOut = xOut & " " & VBA.Mid(pValue, i, 1)
Else
xOut = xOut & VBA.Mid(pValue, i, 1)
End If
Next
AddSpaces = xOut
End Function

3. 保存代码并关闭 应用程序 窗口，选择一个空白单元格并输入此公式 =AddSpaces(A1)，然后拖动自动填充句柄覆盖要应用此公式的单元格。

使用 Kutools for Excel 在名字和姓氏之间添加空格

如果您不熟悉自定义函数，可以应用 Kutools for Excel 的 添加文本 工具快速在名字和姓氏之间添加空格。

1. 选择要添加空格的单元格，点击 Kutools > 文本 > 添加文本。见截图：

2．在 添加文本 对话框中，输入 一个空格 到 文本 框中，勾选 高级 选项，并从下拉列表中选择 大写字母前 。见截图：

3. 点击 确定 或 应用，现在每个大写字母前都添加了一个空格。见截图：

提示：如果想删除前面的空格，您可以应用 Kutools for Excel的 删除空格 工具，它可以帮助您根据需要删除前导空格、尾随空格、多余空格或所有空格。

演示：使用 Kutools for Excel 在名字之间添加空格