excel如何实现字符串拆分

可以利用VBA和正则表达式，编写自定义函数 Function SplitString(vStr As String, vType As Integer) As String With CreateObject("VBScript.RegExp") If vType = 1 Then ’将数字置换为空，提取非数字 .Pattern = "\d" ‘数字 ElseIf vType = 0 Then ’将非数字置换为空，提取数字 .Pattern =