Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。 word中自带正则表达式,不过Excel中却没有内置。可以在VBA中定义一个正则表达式函数,然后Excel中就可以调用了。VBA代码如下(VBA高亮无效,凑合着看): 1.Function ExStr(Str As String, Parttern As String, ActionID As Integer, Optional RepStr As String = "") '正则表达式 V2 '增加:完善注释 '函数ExStr功能,根据正则表达式,替换或判断或提取字符串 '参数 str 源字符串 '参数 Parttern 正则表达式字符串 '参数 ActionID '函数功能 '1正则方法一,替换符合正则表达式的字符,可选参数RepStr为替换值 '2正则方法二 判断是否有符合正则表达式,有返回“TRUE”,无返回“FALSE” '3正则方法三,提取符合正则表达式的字符 '参数 Repstr 指定替换的字符,可选项,默认为空 '附常用几个正则表达式 '第二个参数Parttern为正则表达式,按规则使用即可。使用该函数会自动得到匹配结果 '例如,要提取4位数,如下调用即可:=exStr(A1,"\d{4}",3) '替换:=ExStr(B2,"\d{4}",1,"0713") '判断:=ExStr(C2,"\d{4}",2) ? '匹配4位数 \d{4} ' '匹配中文字符 [\u4e00-\u9fa5] '匹配双字节字符(包括汉字在内):[^\x00-\xff] '匹配空白行的正则表达式:\n\s*\r '匹配HTML标记的正则表达式:<(\s*?)[^>]*>.*?|<.*?> '匹配首尾空白字符的正则表达式:^\s*|\s*$ 可以用来删除行首行尾的空白字符(包括空格、制表符、换页符等等),非常有用的表达式 '匹配Email地址的正则表达式:\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)* '匹配网址URL的正则表达式:[a-zA-z]+://[^\s]* '匹配帐号是否合法(字母开头,允许5-16字节,允许字母数字下划线):^[a-zA-Z][a-zA-Z0-9_]{4,15}$ '匹配国内电话号码:\d{3}-\d{8}|\d{4}-\d{7} 匹配形式如 0511-4405222 或 021-87888822 '匹配腾讯QQ号:[1-9][0-9]{4,} '匹配中国邮政编码:[1-9]\d{5}(?!\d) '匹配身份证:\d{15}|\d{18} '匹配ip地址:\d+\.\d+\.\d+\.\d+ Excel整体界面趋于平面化,显得清新简洁。流畅的动画和平滑的过渡,带来不同以往的使用体验。 |
温馨提示:喜欢本站的话,请收藏一下本站!