删除文本中的空格和非打印字符

雨落空巷 · 发表于 2010-4-11 14:25

灰常实用，楼主有心，收了！

[ 本帖最后由雨落空巷于 2010-4-11 14:27 编辑 ]

lhx120824 · 发表于 2010-4-15 16:32

几乎无所不能，论坛中人才济济。

chinaksj · 发表于 2010-5-28 15:34

帮了我一个大忙，我利用楼主的理论，写了一个Excel中删除所有非打印字符的函数共勉。
Function Clean_A(ByVal sContent As String) As String
Dim i As Integer
Dim sTmp As String
sTmp = sContent
For i = 1 To 31
      sTmp = Replace(sTmp, Chr(i), Chr(32))
Next i
sTmp = Replace(sTmp, Chr(127), Chr(32))  '（值为127、129、141、143、144和157）。
  sTmp = Replace(sTmp, Chr(129), Chr(32))
sTmp = Replace(sTmp, Chr(141), Chr(32))
sTmp = Replace(sTmp, Chr(143), Chr(32))
sTmp = Replace(sTmp, Chr(144), Chr(32))
sTmp = Replace(sTmp, Chr(157), Chr(32))
sTmp = Replace(sTmp, Chr(160), Chr(32))
Clean_A = Trim(sTmp)
End Function

marry1986919 · 发表于 2010-6-24 23:25

麻烦删除下我这个表格里面的空格，最后进行求和

wuhanhan · 发表于 2010-6-25 07:32

用数据－分列－分隔符号，查找替换很容易处理

Excel_小虾米 · 发表于 2010-6-25 07:50

收藏收藏，好东西一定要收藏，感谢楼主

bbs123007 · 发表于 2010-8-19 23:15

好东西一定要收藏，感谢楼主

Wangqisong · 发表于 2010-8-23 10:27

非常有用，谢谢楼主呀

wsq19860128 · 发表于 2010-12-24 09:36

专业，牛x，值得学习

guoybb · 发表于 2011-6-21 21:49

总结的不错，对空格及不名字符特别头疼

		自动登录	找回密码
密码			免费注册

[分享] 删除文本中的空格和非打印字符

楼主是高人呀，赞一个。

回复 14楼 marry1986919 的帖子