您是否有大量包含空格的数据,并且需要删除这些空格?也许是从另一个程序导入的,或者错误输入了空格。例如,您在工作表中可能有大量的策略编号,并且策略编号中有空格。如果要删除这些空格,可以使用两种方法。

第一种方法是使用SUBSTITUTE函数。假设策略编号在单元格A5中。在单元格B5中,您可以使用以下公式:

=SUBSTITUTE(A5," ","")

结果是单元格B5包含删除了所有空格的策略号。

如果您有很多包含空格的单元格,并且要一步删除它们,则第二种方法效果很好。创建以下宏:

Sub NoSpaces()

Dim c As Range

For Each c In Selection.Cells         c = Replace(c, " ", "")

Next End Sub

选择要修改的单元格,然后运行宏。它检查选定范围内的每个单元格,并删除该范围内的所有空格。然后将结果放回同一单元格中。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(3037)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: