在 Excel 单元格中删除空格 – 删除前面的空格、后面的空格、多余空格或所有空格

有时，当您从其他应用程序复制粘贴数据到工作表时，可能会无意中带入多余的空格，从而引发问题。例如，对两个包含前导空格的数字单元格求和，结果可能返回 0 而非正确数值；又如，比较内容相同但其中一个单元格含有前导或尾随空格的两个单元格时，也可能得出错误结论。那么，如何高效清除这些多余空格呢？本教程将为您介绍几种实用方法。

从单元格中删除包括前导、尾随及中间多余空格在内的所有多余空格

假设您有一组包含前导、尾随及中间多余空格的单元格，TRIM 函数可轻松帮您清除这些多余空格。

选择一个空白单元格，输入 =TRIM(B3)，然后按 Enter 键。接着向下拖动其填充柄，即可将公式快速应用到其他单元格。参见截图：
注意：B3 是包含需删除空格文本的单元格。

现在，指定单元格中所有多余空格（包括前导、尾随及中间的空格）均已清除。

注意：此操作需在新列中进行。删除所有多余空格后，您需要按 Ctrl+C 复制，选择原数据区域，右键单击并选择选择性粘贴部分下的值。

仅删除单元格中的前面的空格

在某些情况下，您可能只需删除单元格开头的空格，同时保留其中的所有中间空格（如下图所示）。本节将为您介绍另一种公式和 VBA 代码，轻松解决这一问题。

使用 MID 函数仅删除前面的空格

选择一个空白单元格（此处为 D3），将下方公式复制到其中，然后按 Enter 键。接着向下拖动填充柄，即可将公式快速应用到其他单元格。

=MID(B3,FIND(MID(TRIM(B3),1,1),B3),LEN(B3))

在此公式中，B3 是要删除前导空格的单元格。

注意：此操作需在新列中进行。删除所有前导空格后，您需用不含公式的修剪后数据替换原始数据。

使用 VBA 代码仅删除前面的空格

1. 打开包含需删除前导空格的单元格的工作表，然后按下 Alt+F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。

2. 单击插入 > 模块，然后将下方 VBA 代码复制到模块窗口中。

Sub RemoveLeadingSpaces()
'Updateby20190612
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = VBA.LTrim(Rng.Value)
Next
End Sub

3. 按 F5 键运行代码。此时会弹出一个 Kutools for Excel 对话框，请选择要删除前导空格的连续单元格，然后单击确定按钮。

现在，您可以看到所选单元格中前导的空格已被清除。

仅删除单元格中的后面的空格

1. 打开包含要删除前面的空格的单元格的工作表，然后按 Alt+F11 键，打开 Microsoft Visual Basic for Applications 窗口。

2. 单击插入> 模块，然后将下方 VBA 代码复制到模块窗口中。

Sub RemoveTrailingSpaces()
'Updateby20190612
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = VBA.RTrim(Rng.Value)
Next
End Sub

3. 按 F5 键运行代码。此时会弹出一个 Kutools for Excel 对话框，请选择要删除尾部空格的连续单元格，然后单击确定按钮。现在，您可以看到所选单元格中的尾部空格已被删除。

从单元格中删除所有空格

若您希望彻底清除特定单元格中的所有空格，本节所提供的方法定能助您一臂之力。

使用 SUBSTITUTE 函数从单元格中删除所有空格

=SUBSTITUTE(）text, old_text, new_text, [instance_num])

选择一个空白单元格，将下方公式复制到其中，然后按 Enter 键。接着向下拖动填充柄，即可将公式快速应用到其他单元格。

=SUBSTITUTE(B3," ","")

提示：在此公式中，B3 是包含需删除所有空格的文本的单元格；
         " "（双引号括起的一个空格）表示要删除的空格；
         ““表示将用空内容替换所有空格。

随后，您将立即看到指定单元格中的所有空格都已移除。

注意：此操作需在新列中进行。删除所有空格后，您需用不含公式的修剪数据替换原始数据。

使用“查找和替换”功能从单元格中删除所有空格

除了上述 SUBSTITUTE 函数外，您还可以使用“查找和替换”功能，轻松删除单元格中的所有空格。

1. 选择包含要删除空格的单元格，按下 Ctrl+H 键即可打开查找和替换对话框。

2. 在查找和替换对话框的替换选项卡中，于查找内容文本框中输入一个空格，保持替换为文本框为空，然后单击全部替换按钮。

使用 Kutools 轻松删除单元格中的前导、尾随、多余及所有空格

1. 选择包含要删除空格的单元格的一个或多个区域，单击 Kutools > 文本 > 删除空格。参见截图：

2. 您可以在删除空格对话框中看到 5 个选项：

• 若仅需删除前面的空格，请勾选前面的空格选项；
• 若仅需删除后面的空格，请勾选后面的空格选项；
• 若要同时删除前面的空格和后面的空格，请勾选前导与后面的空格选项；
• 若要删除所有多余空格（包括前导、尾随及中间多余空格），请勾选所有多余的空格选项；
• 若要删除所有空格，请勾选所有空格选项。

然后点击确定按钮即可开始操作。

其他与 Excel 空格相关的实用场景

除了从单元格中删除空格外，您是否还遇到过需要统计空格、添加空格，或将空格替换为其他字符的情况？以下推荐功能可助您大幅提升 Excel 工作效率。

---

最佳办公效率工具

Kutools for Excel 解决您的大部分问题，并将您的工作效率提升 80%

• 超级编辑栏（轻松编辑多行文本和公式）；阅读版式（轻松阅读和编辑大量单元格）；粘贴到筛选范围……
• 合并单元格/行/列并保留数据；分割单元格内容；合并重复行并求和/求平均值……防止重复项单元格；比较区域……
• 选择重复或唯一行；选择空白行（所有单元格均为空）；超级查找和模糊查找多个工作簿中的内容；随机选择……
• 精准公式复制多个单元格而不更改公式引用；自动创建引用到多个工作表；插入项目符号、复选框等更多功能……
• 收藏并快速插入公式、区域、图表和图片；加密单元格并设置密码；创建邮件列表并发送电子邮件……
• 提取文本、添加文本、删除某位置字符、删除空格；创建并打印数据分页统计；在单元格内容与批注之间转换……
• 超级筛选（保存并应用筛选方案到其他工作表）；高级排序按月/周/日、频率等分组；特殊筛选按加粗、倾斜等格式……
• 合并工作簿和工作表；汇总表格基于关键列；分割数据到多个工作表；批量转换 xls、xlsx 和 PDF……
• 数据透视表按周数、星期几等分组……显示未锁定、选区锁定并以不同颜色标识；高亮显示包含公式/名称的单元格……

了解更多……完整功能 30 天免费试用……购买…… 

---

Office Tab —— 为 Office 带来标签式界面，让您的工作更加轻松

• 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑与阅读，大幅提升多文档操作效率！
• 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中操作。
• 将您的工作效率提升 50%，每天减少数百次鼠标点击！

了解更多……完整功能 30 天免费试用……购买……