vba删除字符串中特殊符号

VBA中可以使用正则表达式和 Replace 函数来删除字符串中的特殊符号。

以下是一个例子：

Function RemoveSpecialCharacters(str As String) As String
    Dim regEx As Object
    Set regEx = CreateObject("vbscript.regexp")
    regEx.Global = True
    regEx.Pattern = "[^\w\s]"
    RemoveSpecialCharacters = regEx.Replace(str, "")
End Function
在上述代码中，我们创建了一个名为 RemoveSpecialCharacters 的函数，该函数接受一个字符串作为输入，并使用正则表达式和 Replace 函数删除字符串中的特殊符号。正则表达式的模式为 [^\w\s]，它匹配不是字母数字或空格的所有字符。最后，函数返回没有特殊符号的字符串。