如何在Excel中删除单元格中单词之间多余的空格

你是否曾经在一个杂乱无章的电子表格中阅读和理解数据时发现了许多单词之间的空格？别担心，我们将向您展示如何通过一种快速简单的方法去除这些多余的空格，使您的Excel数据变得整洁有序。本文将解释如何在Excel单元格中消除单词之间多余的空格。无论您的数据集大小如何，Excel都提供了许多方法，可以帮助您快速准确地删除这些多余的空格。

删除单元格中单词之间多余的空格

在这里，我们首先创建一个VBA模块，然后运行它来完成任务。让我们看一个简单的过程，了解如何在Excel中删除单元格中单词之间的多余空格。

步骤1

考虑一个Excel工作簿，其中包含一组具有大量空格的字符串，类似于下面的图片。

如何在Excel中删除单元格中单词之间多余的空格

首先，右键单击工作表名称，选择“查看代码”以打开VBA应用程序。

**右键单击 > 查看代码。 **

步骤2

然后点击“插入”并选择“模块”，然后将下面的代码复制到文本框中。

**插入 > 模块 > 复制。 **

代码

Sub TrimExcessSpaces()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "Remove Extra Spaces"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
   Rng.Value = Application.WorksheetFunction.Trim(Rng.Value)
Next
End Sub

如何在Excel中删除单元格中单词之间多余的空格