如何使用Excel VBA替換特殊字符

Question

我的excel工作簿中是否有這個“ ...”特殊字符，我想用“。”替換所有字符。當我將該“。”字符放入代碼中時，它變成“？”。 我運行宏后，它將所有內容替換為“。”

Sub FindReplaceAll()

 Dim ws      As Worksheet
 For Each ws In ActiveWorkbook.Worksheets
   ws.Cells.Replace What:="�", Replacement:=".", LookAt:= _
    xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False

       Next ws
End Sub

提前致謝

Answer 1

嘗試在一個單元格中復制此字符，然后使用ASCII碼並將該字符替換為ASCII數字：

Dim num =123
Ex:
    Cells.Replace What:=Chr(Num), Replacement:=".", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False