Question

EXCEL 匹配正则表达式

抱歉……居然只有5分了……

我想问问，比如A列为随便一些字符，B列为各种各样的正则表达式，如何实现在C列显示A列的字符串是否匹配B列的正则表达式。

流程比如：A1与B列的正则表达式都匹配一遍，C列显示1则表示能匹配上，0则表示不满足

感谢
B列这个匹配列是正则表达式
用A2举例，流程是先验证A2中是否含有B2这个正则表达式表达的内容，如果有就在C2写上B2，如果没有那么继续验证A2中是否含有B3这个正则表达式表达的内容，如果有就在C2写上B3，如果没有那么继续验证A2中是否含有B4…如此循环，到最后如果都没有C2就空着
A2之后再是A3跟B2匹配，跟B3匹配直到出现A3中包含Bx这个表达式中表达的内容
求问各位大大有法实现吗，谢谢

Answer 1

可以用vba完成,按住alt依次按f11,i,m
粘贴代码后按f5即可在c列得到结果

Sub Test()
atr = Range("a65536").End(xlUp).Row
btr = Range("b65536").End(xlUp).Row
a = Range("a1:a" & atr).Value
b = Range("b1:b" & btr).Value
ReDim c(1 To atr, 1 To 1)
Set reg = CreateObject("vbscript.regexp")
With reg
.Global = True
.IgnoreCase = True
For ar = 1 To atr
For br = 1 To btr
.Pattern = b(br, 1)
If .Test(a(ar, 1)) Then
c(ar, 1) = "匹配"
Exit For
End If
Next
Next
End With
Range("c1:c" & atr) = c
Set reg = Nothing
End Sub

追问

用这个的话，无论我怎么改B列的正则表达式，C列都是“匹配”，求修改~感激不尽

追答

将A:B列的具体值贴出来

追问

非常感谢，请问能不能再修改下，如图所示
sheet1中B列是基础列，而A列则是其对应的序号
sheet2中B列是用来匹配的匹配列，A列是其对应的序号

希望实现的流程：sheet1中Bx与sheet2中A列对应需要相同的bx进行匹配，验证Bx中是否含有bx中正则表达式所表达的内容

感激不尽

追答

上面的回答解决了你前面的问题吗?

sheet1的a列的值一定出现在sheet2的a列?
Bx只与1个bx进行验证?而不是所有的bx?

追问

你好，我先说说上面的回答，一定程度解决了问题
为什么只是一定程度，因为当A列和B列都有相当大数量的行，匹配后就全是匹配成功
并不是说这样一定不好，而是没法验证其正确性，当然全部匹配实在是很异常

是的，我实际又操作了下，觉得改下会更好
sheet1的a列的值一定出现在sheet2的a列，Bx只跟sheet2里a相同的bx匹配

再次感谢你的回答

追答

Sub Test()
Sheets("sheet1").Select
atr = Range("a65536").End(xlUp).Row
a = Range("a1:b" & atr).Value
ReDim c(1 To atr, 1 To 1)
Set reg = CreateObject("vbscript.regexp")
With reg
.Global = True
.IgnoreCase = True
For ar = 1 To atr
.Pattern = Sheets("sheet2").Range("a:a").Find(a(ar, 1), , , xlWhole)
If .Test(a(ar, 2)) Then c(ar, 1) = "匹配"
Next
End With
Range("c1:c" & atr) = c
Set reg = Nothing
End Sub

追问

这个不行，目测都可以看出明显的错误，应该符合的C列没有显示匹配
能不能把联系方式PM给我，即时交流比较快，感谢

追答

你可以hi我

Answer 2

好像是在说自动比较的算法？
B需要切割字符串，然后自动生成表达式数组
然后用for循环测试并生成C?
有个东西要提一下：
using System.Collections.Generic;

List<string> c=new List<string>();

我建议一个A对一个List<C>()；然后c又是一个List
因为每个B有可能生成很多段string。
貌似是为了试验用的？
我有一个，上Q来拿

追问

已经发送百度小心，求加Q

Answer 3

“匹配”是神马？怎样才算匹配？说说清楚。

追问

抱歉，表述不清……
意思是看正则表达式描述的内容（B列B1,B2,B3让它在B列里一个个找，反正找到就在C显示1，没找到就0），在A1里出现没有。不断重复这个过程完成A1-AX的验证。

这有法实现吗

追答

C列做公式 =COUNTIF(A$1:A$100,B1)，下拉公式。也许是你要的。试试看。

追问

不行啊，我举个例
A1 nbsp; b1 (\d+=\w{0,5}.){5,} C1公式
A2 uname`" b2 IETEST$ C2公式
A3 '= b3 ('$|"$|/\*.*\*/|--$|;$) C3公式

这样按理来说A1 A2中能找到B3表达的内容，但是A3是不行的，我希望用公式来完成这个筛选，可以实现吗
感谢