EXCEL怎么批量删除特殊符号 200分

2020-10-28 教育 114阅读
右击工作表标签,查看代码,把下面的代码复制过去,按F5运行,在弹出的对话框中依次输入你要指删除的字符,就可以了
Sub zjh()
Dim mStr$, i%, temStr$
mStr = InputBox("请连续输入你要删除的字符,如,。[]等等")
For i = 1 To Len(mStr)
temStr = Mid(mStr, i, 1)
Cells.Replace What:=temStr, Replacement:=""
Next
End Sub
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com