技巧1：使用「查找替换」功能（推荐）
strong>适用场景：批量删除所有空格（包括单词间的空格）。
strong>步骤：
. 选中需要处理的单元格区域（或按 `Ctrl + A` 全选）。
. 按 `Ctrl + H` 打开「查找和替换」对话框。
. 查找内容：输入一个空格（按空格键）。
. 替换为：留空（什么都不输入）。
. 点击 全部替换。
技巧2：使用 `TRIM` 函数（保留单词间单空格）
strong>适用场景：仅删除首尾空格和单词间多余空格（保留单词间的一个空格）。
strong>步骤：
. 在空白列（如B1）输入公式：
xcel
TRIM(A1)
假设原数据在A列）
. 双击填充柄向下填充公式。
. 复制B列结局 → 右键点击原数据列（A列）→ 选择性粘贴 → 值。
. 删除辅助列（B列）。
技巧3：使用 `SUBSTITUTE` 函数（删除所有空格）
strong>适用场景：删除所有空格（比「查找替换」更灵活）。
strong>步骤：
. 在空白列（如B1）输入公式：
xcel
SUBSTITUTE(A1, ” “, “”)
. 双击填充柄填充公式。
. 复制B列结局 → 粘贴为值到原位置。
. 删除辅助列。
技巧4：Power Query（批量清洗数据）
strong>适用场景：处理大型数据集或需重复操作。
strong>步骤：
. 选中数据区域 → 数据 选项卡 → 从表格/区域（创建表）。
. 在Power Query编辑器中：
. 主页 → 关闭并上载，覆盖原数据。
技巧5：VBA宏（自动化处理）
strong>适用场景：频繁操作需一键完成。
strong>步骤：
. 按 `Alt + F11` 打开VBA编辑器。
. 插入新模块，粘贴下面内容代码：
ba
ub RemoveSpaces
im rng As Range
n Error Resume Next
et rng = Application.InputBox(“选择单元格区域”, Type:=8)
f rng Is Nothing Then Exit Sub
pplication.ScreenUpdating = False
ng.Value = Application.Evaluate(“IF(1},TRIM(” & rng.Address & “))”) ‘保留单词间单空格
或使用：rng.Replace ” “, “” ‘删除所有空格
pplication.ScreenUpdating = True
nd Sub
. 按 `F5` 运行宏 → 选择区域 → 自动处理。
拓展资料建议
操作前建议备份数据，避免误操作丢失内容。
