利用VBA如何取出单元格内的特定字符

发布网友

我来回答

1个回答

热心网友

Sub kerting()
With CreateObject("Vbscript.Regexp")
.Global = True
.IgnoreCase = True
.Pattern = "[a-zA-Z]{3}"
Set mmatches = .Execute([a1].Text) 'a1单元格为目前需要整理的字符串
[a2] = mmatches(mmatches.Count - 1) 'a2单元格为提取后结果
End With
End Sub

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com