加载中…vba 去除软空格 Chr(10)
(2012-08-13 21:57:31)
标签：
换行符a1回车符空格等号杂谈 |
Sub test1()
If Right(ActiveCell, 1) = Chr(10) Then
End If
End Sub
chr(9)、chr(10)、chr(13)、chr(32)、chr(34)
1、所有关于 ASCII码的表格chr(13) 是一个回车
Chr(10) 是个换行符
chr(32) 是一个空格符
chr（9） 是tab，
2、回车的作用是回到当前行的首列。
3、那如果我只用回车符或者换行符会出现什么情况呢？
效果是一样的。现在的语言会经过转换的，自动变成“回车换行”的。
如果用汇编就可以看出效果了
4、
Public Sub a()
arr = Split(Range("a1").Text, Chr(10))
If arr(UBound(arr)) = "" Then Range("b1") = Left(Range("a1").Text,
Len(Range("a1").Text) - 1)
End Sub
[a1]=replace(application.trim(replace([a1],chr(10) ," ")),"
",chr(10))
中间多出换行符的也可以清除
喜欢
0
赠金笔