Last Col in Range

[AlexanderBB]

I was given this for a range from Y to the last used Col from CP in Row eRow,

Set iRange = Range(Range("Y" & eRow), Range("CQ" & eRow).End(xlToLeft))

And it's worked many times fine, until suddenly iRange.address is $Y37:$CP$37
So I assumed there was a rogue invisible character somewhere and tried this

                    kcol = 94
                    Do Until Val(Cells(eRow, kcol)) > 0
                    Cells(eRow, kcol) = ""
                    kcol = kcol - 1
                    Loop
                    Set iRange = Range(Range("Y" & eRow), Range("CQ" & eRow).End(xlToLeft))

Thinking that would fix it. But iRange address is still $Y37:$CP$37
What might cause this ?

 

[StephenCrump]

There are several rows affected. Not sure why this should be, but here's a fix:

Sub FixIt()

    With Worksheets("1990+")
        With Intersect(.UsedRange, .Range("Y:CP"))
            'xxx is something that won't be found in the range.  Change if necessary!
            .Replace What:="", Replacement:="xxx", LookAt:=xlWhole, MatchCase:=False
            .Replace What:="xxx", Replacement:="", LookAt:=xlWhole, MatchCase:=False
        End With
    End With
    
End Sub

 

[AlexanderBB]

Thank you !!! About to try that out...

 

[AlexanderBB]

Sure has... that's great. Many thanks indeed. Held me up for 3 days!
Don;t know how they got there, certainly wasn't intentional. Whatever it is.