利用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
