判断是否为字母:s like "[a-z,A-Z]"
判断是否为符号,是否可用 s like "[!-/ ,:-@,[-
`,{-~]"
32
|
33
|
34
|
35
|
36
|
37
|
38
|
39
|
40
|
41
|
42
|
43
|
44
|
45
|
46
|
47
|
|
|
|
|
|
|
|
|
|
|
|
!
|
"
|
#
|
$
|
%
|
&
|
'
|
(
|
)
|
*
|
+
|
,
|
-
|
.
|
/
|
|
|
|
|
|
|
|
|
|
|
48
|
49
|
50
|
51
|
52
|
53
|
54
|
55
|
56
|
57
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
0
|
1
|
2
|
3
|
4
|
5
|
6
|
7
|
8
|
9
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
58
|
59
|
60
|
61
|
62
|
63
|
64
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
:
|
;
|
<
|
=
|
>
|
?
|
@
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
65
|
66
|
67
|
68
|
69
|
70
|
71
|
72
|
73
|
74
|
75
|
76
|
77
|
78
|
79
|
80
|
81
|
82
|
83
|
84
|
85
|
86
|
87
|
88
|
89
|
90
|
A
|
B
|
C
|
D
|
E
|
F
|
G
|
H
|
I
|
J
|
K
|
L
|
M
|
N
|
O
|
P
|
Q
|
R
|
S
|
T
|
U
|
V
|
W
|
X
|
Y
|
Z
|
91
|
92
|
93
|
94
|
95
|
96
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
[
|
\
|
]
|
^
|
_
|
`
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
97
|
98
|
99
|
100
|
101
|
102
|
103
|
104
|
105
|
106
|
107
|
108
|
109
|
110
|
111
|
112
|
113
|
114
|
115
|
116
|
117
|
118
|
119
|
120
|
121
|
122
|
a
|
b
|
c
|
d
|
e
|
f
|
g
|
h
|
i
|
j
|
k
|
l
|
m
|
n
|
o
|
p
|
q
|
r
|
s
|
t
|
u
|
v
|
w
|
x
|
y
|
z
|
123
|
124
|
125
|
126
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
{
|
|
|
}
|
~
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
iamlaosong文
1、从网站导出的Excel文件单元格内容后面多了
一个
不可见
字符
,怎么造成的不知道,但不是每一列都有。想要用
VBA
代码去掉,就要先判断出是什么
字符
,将内容复制到文本环境中(比如编程环境或者UltraEdit中),发现最后面那个是个“?”,Asc()函数取其码值也是63,但奇怪的是截取这个
字符
和“?”或者Chr(63)相比,发现并不相等。
2、实际情况这个
字符
应该不是“?”...
有个网友希望使用代码输入如下“月亮”
字符
,从截图中可以看出其字体是Segoe UI Symbol。如果文件中已经有这个
字符
,当然最简单的方法就是复制/粘贴,可以如果空白文档,那么该如何输入呢?是否可以使用
VBA
代码直接输入这个特殊
字符
?
之前使用使用Dir批量获取指定文件夹下的excel文件的时候,出现了问题。**,导致打开文件的时候出现无法找到的情况。使用FileSystemObject,解决此问题。出现的问题是:文件名中的。
DLL导出函数定义---------------------------------------------------__declspec(dllexport) int __stdcall MyExportFunction(const char * p1, const char * p2, char * const out);
VBA
处理
(VB.net的
处理
也类似)要注意的一点是,C语言中的【c...
Function UTF16(sHex As String, Optional sMode As String = "HEX") As String
Dim lByte, hByte, arrRes
If Application.Hex2Dec(sHex) > &H10000 Then
'&HDC00 = 56320, &HD800 = 55296
0 到 31 之间的数字与标准的非打印 ASCII 代码相同。例如,Chr(10) 可以返回换行
字符
。charcode 的正常范围为 0 – 255。然而,在 DBCS 系统,charcode 的实际范围为...
正则表达式中的元
字符
特殊
字符
重复
字符
字符
集通配符其它
字符
运算符优先级
正则表达式由若干个 分支 构成,分支之间用符号 | 相连。从逻辑上讲,分支之间是一种“或”的关系,
一个
字符
串只要与正则表达式中的任何
一个
分支相匹配,这个
字符
串就与整个正则表达式相匹配。比如,“第三人称代词”可以用正则表达式表示为 他|她|它|他们|她们|它们 。
特殊
字符
s = Array("+", “^”, “%”, “~”, “(”, “)”)
For Each i In s
teshu = replace(teshu, i, "{" & i & "}")
End Sub
sub调用
b = Sheet1.
Dim strs As String
Dim reg As Object, reg1 As Object
Set reg = CreateObject("vbscript.regexp")
With reg
.Global = True
在Excel中不可见
字符
用ASC查为63,用chr(63)进行替换不成功用正则s匹配也不成实测为unicode
字符
160用ASCW函数可以求
还原用CHRW函数
VBA
可以
对选择单进行替换
代码如下:
Selection.Replace What:=ChrW(160), Replacement:=""
也可以对全工作表进行替换
Cells.Replace What:=ChrW(160), R...