Excel 从字符串中删除除a-zA-Z0-9以外的所有特殊字符

是否有一种方法可以删除除a-zA-Z0-9之外的所有特殊字符，如Python中的：

((re.sub(r"[^a-zA-Z0-9]+", ' ', String)))

由于我们可以使用正则表达式，下面是可以使用的VBA函数

公共函数AllClean（TextToReplace作为字符串）作为字符串
作为对象的Dim ObjRegex
设置ObjRegex=CreateObject（“vbscript.regexp”）
用ObjRegex
.Global=True
.Pattern=“[^a-zA-Z0-9.\uS]+”
AllClean=.Replace（Replace（TextToReplace，“-”，Chr（32）），vbNullString）
以
端函数

在VBA中，使用

Set re = CreateObject("vbscript.regexp")

有关更多信息：

更新：

您想要的功能可能类似于：

函数AllClean（str作为字符串）作为字符串
使用CreateObject（“vbscript.regexp”）
.Global=True
.ignorecase=True
.MultiLine=True
.Pattern=“[^a-zA-Z0-9]”
所有清洁=.replace（str，“”）
以
端函数

先生，谢谢您的帮助，可能是重复的。这对我来说很管用。对于像我这样的初学者，我已经更新了我的问题，以提供可以用作函数的其他信息。再次感谢。。。