excelvba正则表达式从实例开始.docxVIP

EXCEL VBA 正则表达式 从实例开始 所有代码都测试过 [2011-09-09 ： [2010-08-08 ： 数据验证经常出现的情况是，需要验证和处理大量的文本 内容， 有时候需要查找字符串， 有时候要按条件替换， 并且这些待处理的问题还是有一定的 规律可循的，但是无法通过枚举的方式挨个验证，这个时候就需要正则表达式来帮忙。 1. 正则表达式 (Regular Expression) 基础 正则表达式是通用的文本搜索和处理方案，它的知识不是 VBA独有的，基本上每种语 言都内置了正则表达式的功能。正则表达式的基础知识不是这里的重点，需要的朋友可以 Google 一下，或者参看下面的一些入门教程： tutorials/regex/ 中的正则表达式应用 在 VBA中使用正则表达式，可以通过下列途径实现： 创建正则表达式对象 : 前期绑定：在 VBA 代码编辑器中的 Tools 菜单中，选中 References... ，然后引用 Microsoft VBScript Regular Expressions 类库，然后直接定义对象： Dim reg As New RegExp。 后期绑定：使用 CreateObject 方法定义对象： CreateObject() 。 前一种方式的优点是可以有编辑器的 Intellisense 支持 RegExp 对象的属性 : Global - 设置或返回一个 Boolean 值，该值指明在整个搜索字符串时模式是全部匹配还 是只匹配第一个。 如果搜索应用于整个字符串， Global 属性的值应该为 True ，否则其值为 False 。默认的设置为 True 。 Multiline - 返回正则表达式是否具有标志 m, 缺省值为 False 。如果指定的搜索字符串分 布在多行，这个属性是要设置为 True 的。 IgnoreCase - 设置或返回一个 Boolean 值，指明模式搜索是否区分大小写。如果搜索是区 分大小写的，则 IgnoreCase 属性应该为 False ；否则应该设为 True 。缺省值为 True 。 Pattern - 设置或返回被搜索的正则表达式模式。 被搜索的正则字符串表达式。它包含各 种正则表达式字符。 RegExp 对象的方法 : Execute - 对指定的字符串执行正则表达式搜索。需要传入要在其上执行正则表达式的文 本字符串。正则表达式搜索的设计模式是通过 RegExp 对象的 Pattern 来设置的。 Execute 方法返回一个 Matches 集合，其中包含了在 string 中找到的每一个匹配的 Match 对 象。如 果未找到匹配， Execute 将返回空的 Matches 集合。 Replace - 替换在正则表达式查找中找到的文本 Test - 对指定的字符串执行一个正则表达式搜索，并返回一个 Boolean 值指示是否找到 匹配的模式。属性对 Test 方法没有影响。 如果找到了匹配的模式， Test 方法返回 True ；否 则返回 False 。 MatchCollection 对象与 Match 对象 匹配到的所有对象放在 MatchCollection 集合中，这个集合对象只有两个只读属性： Count: 匹配到的对象的数目 Item ：集合的又一通用方法，需要传入 Index 值获取指定的元素。 一般，可以使用 For Each 语句枚举集合中的对象。集合中对象的类型是 Match 对象有以下几个只读的属性 : FirstIndex - 匹配字符串在整个字符串中的位置，值从 0 开始。  Match。 Length - 匹配字符串的长度 Value - 匹配的字符串 SubMatches - 集合，匹配字符串中每个分组的值。作为集合类型，有  Count  和  Item  两个 属性。 常用的正则表达式主要有以下几种 : 匹配中文字符的正则表达式 : [\u4e00-\u9fa5] 评注：匹配中文还真是个头疼的事，有了这个表达式就好办了 匹配双字节字符 ( 包括汉字在内 ): [^\x00-\xff] 评注：可以用来计算字符串的长度（一个双字节字符长度计 2， ASCII 字符计 1） 匹配空白行的正则表达式： \n\s*\r 评注 : 可以用来删除空白行 匹配 HTML标记的正则表达式： (\S*)[^]*.*/|.* / 评注：网上流传的版本太糟糕，上面这个也仅仅能匹配部分，对于复杂的嵌套标记依旧无能为力 匹配首尾空白字符的正则表达式： ^\s*|\s*$ 评注：可以用来删除行首行尾的空