'+sz')图片其他用法访佛

用法：=tq(经受单位格， 输入索要类型)，图举例下：

1、去掉汉字，公式：=tq(A3，'-hz')

图片

2、索要汉字，公式：=tq(A3，首页-凯先圣 麻类有限公司'+hz')

图片

3、索要数字， 首页-盛 先奥锁具有限公司公式：=tq(A3， 台山市捷达电器有限公司新闻资讯'+sz')

图片

其他用法访佛，以此类推即可。第二个参数索要类型证据注解：

上海鼎星国际贸易有限公司

+hz：取汉字

+sz：取数字

+zm：取字母

-hz：取非汉字

-sz：取非数字

-zm：取非字母

自界说函数代码：

Function TQ(rng As String， types As String) As String

Dim regex As Object

Set regex = CreateObject('vbscript.regexp')

With regex

.Global = True

Select Case types

Case Is = '-hz'

'索要去汉字

.Pattern = '[一-﨩]'

Case Is = '-zm'

'索要去字母

.Pattern = '[a-zA-Z]'

Case Is = '-sz'

'索要去数字

.Pattern = '[0-9\.]'

Case Is = '+hz'

'取汉字

.Pattern = '[^一-﨩]'

Case Is = '+zm'

'取字母

.Pattern = '[^a-zA-Z]'

Case Is = '+sz'

'取数字

.Pattern = '[^0-9\.]'

End Select

TQ = .Replace(rng， '')

End With

Set regex = Nothing

End Function公司简介

本站仅提供存储就业，整个本色均由用户发布，如发现存害或侵权本色，请点击举报。

• 公司简介
• 图片
• 其它
• 用法
• +sz