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

ms excelmicrosoft technologiesadvanced excel function更新于 2025/3/15 17:48:17

您是否曾经需要阅读和理解杂乱无章的电子表格中的数据，因为单词之间有大量空格?别担心;我们将向您展示如何快速轻松地删除这些多余的空格，让您的 Excel 数据看起来井井有条。本文将介绍如何消除 Excel 单元格中单词之间的多余空格。无论您的数据集是大是小，Excel 都提供了多种方法帮助您快速准确地删除这些多余的空格。

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

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

步骤 1

假设有一个 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