EXCEL怎样去除多余的空格，只保留一个空格？

发布网友发布时间：2022-03-24 16:18

我来回答

共4个回答

懂视网时间：2022-03-24 20:40

产品型号：ASUS S340MC

系统版本：Windows 10

软件版本：Microsoft Office Excel 2019

首先在电脑上打开excel文件

按CTRL+H调出替换对话框

在查找内容框内直接输入一个空格，替换为框内不输入任何内容

点击全部替换，确认，关闭即可

总结：

首先在电脑上打开excel文件

按CTRL+H调出替换对话框

在查找内容框内直接输入一个空格，替换为框内不输入任何内容

点击全部替换，确认，关闭即可

热心网友时间：2022-03-24 17:48

用替换，在“查找内容”输入2个空格，在“替换为”输入1个空格，多替换几次直到提示查找不到就完成了。

热心网友时间：2022-03-24 19:06

'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

热心网友时间：2022-03-24 20:40

最简单的方法，你可以尝试用“ctrl+h”替换命令