Функция замены дает объект не поддерживает свойство или метод

Question

Этот сценарий VBA работал очень хорошо до сегодняшнего дня, когда эта строка repStr = Replace (currentSID, "t #", "SID _")

Функция Replace показывает, что все параметры являются строками.currentSID = "t # 3520"

Sub AddSID(sh As Worksheet)
    Dim r As Long
    Dim c As Long
    Dim currentSID As String
    Dim maxRow As Long
    Dim repStr As String

    maxRow = sh.Cells(2000, 1).End(xlUp).Row
    For r = maxRow To 2 Step -1
        currentSID = sh.Cells(r, 1).Value
        repStr = Replace(currentSID, "t#", "SID_")
        sh.Cells(r, 1).Value = repStr
        currentSID = sh.Cells(r, 1).Value