EXCEL怎样去除多余的空格，只保留一个空格？
发布网友
共4个回答
懂视网
产品型号：ASUS S340MC
系统版本：Windows 10
软件版本：Microsoft Office Excel 2019
首先在电脑上打开excel文件
按CTRL+H调出替换对话框
在查找内容框内直接输入一个空格，替换为框内不输入任何内容
点击全部替换，确认，关闭即可
总结：
首先在电脑上打开excel文件
按CTRL+H调出替换对话框
在查找内容框内直接输入一个空格，替换为框内不输入任何内容
点击全部替换，确认，关闭即可
热心网友
用替换，在“查找内容”输入2个空格，在“替换为”输入1个空格，多替换几次直到提示查找不到就完成了。
热心网友
'From s = "中 国 人民 银行 OK"
' sDelimiter = " "
'To DelStrPersistOne = "中国 人民 银行 OK"
Private Function DelStrPersistOne(s As String, sDelimiter As String) As String
Dim i As Long
Dim l As Long
Dim b As Boolean
Dim str As String
b = False
str = Trim(s)
l = Len(str)
If l = 0 Then
DelStrPersistOne = ""
Exit Function
End If
If l = 1 Then
DelStrPersistOne = str
Exit Function
End If
For i = l - 1 To 2 Step -1
If Mid(str, i, 1) = sDelimiter Then
b = True
str = Left(str, i - 1) + Right(str, Len(str) - i)
Else
If b Then
str = Left(str, i) + sDelimiter + Right(str, Len(str) - i)
End If
b = False
End If
Next i
DelStrPersistOne = str
End Function
热心网友
最简单的方法，你可以尝试用“ctrl+h”替换命令
