如果包含符号，则清除单元格

Question

我在不需要的单元格中有一些数据：

Bã|ŽA…@@,s~?    B{À¿…@@@Ý‚Iá 
J   J
=    ½l   çB@ 
>QQ?    >çÉ?
/-@ D@

我试图让VBA识别出任何这些符号何时存在并清除整个单元格。但是，它似乎没有起作用。我试图在一个数组中得到一些重复符号，并且usig找到是否找到任何符号，然后我想要清除该单元格。我的代码如下：

'Remove unwanted text
vArr = Array("½", "ã", "ç", "J")
Set var10 = Commentpaste.Find(vArr, LookIn:=xlValues, LookAt:=xlPart)
If Not var10 Is Nothing Then
    var10.ClearContents
End If​

此刻基本不起作用，我不明白为什么？有什么想法吗？