码迷,mamicode.com
首页 > 其他好文 > 详细

清除字符串中的换行符

时间:2014-11-01 16:13:20      阅读:233      评论:0      收藏:0      [点我收藏+]

标签:style   http   io   color   ar   sp   strong   div   on   

实际应用场景中,客户输入的地址中含有回车换行,导致格式转换中出错,因此需要清除掉,方法有二:

bubuko.com,布布扣

1、替换,这个方法只能清除一个回车换行
‘检测地址中是否有回车换行
addr = Cells(row1, 12)
If InStr(1, addr, Chr(10), vbBinaryCompare) > 0 Then
MsgBox addr
addr = Replace(addr, Chr(10), "", , , vbBinaryCompare)
addr = Replace(addr, Chr(13), "", , , vbBinaryCompare)
MsgBox addr
Cells(row1, 12) = addr
End If
2、用系统函数,这个方法可以清除所有非打印字符
‘检测地址中是否有回车换行
addr = Cells(row1, 12)
If InStr(1, addr, Chr(10), vbBinaryCompare) > 0 Then
MsgBox addr
addr = Application.WorksheetFunction.Clean(addr)
MsgBox addr
Cells(row1, 12) = addr
End If
想了解更多编程语言教程集合可登陆e良师益友网。

清除字符串中的换行符

标签:style   http   io   color   ar   sp   strong   div   on   

原文地址:http://www.cnblogs.com/yuguotianqing/p/4067195.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!