Excel组合型字符分类

从几十万条数据里抓数？建议你还是用VBA吧！请看图：代码：Sub 筛选() Range("A2").Select js1 = 2 js3 = 2 Do While Len(Cells(js1, 1)) <> 0 js2 = 1 zfc = "" Do While js2 <= Len(Cells(js1, 1)) zf = Mid(Cells(js1, 1), js2, 1) zfc2 = zfc2 & zf If zf >= "0" And zf <= "9" Then zf = "1" Else zf = "a" zfc = zfc & zf js2 = js2 + 1 Loop If zfc = "aa1111aaaaa" Then Cells(js3, 3) = Cells(js1, 1) js3 = js3 + 1 End If js1 = js1 + 1 LoopEnd Sub