Error '1004', application/object error, Do Loop

Hi all,

I'm getting an error on the Do While line when trying to run this macro. The vlookup field is being returned with a value that exists in the list in which the loop is trying to run, yet it doesn't find a match.

Any help would be fantastic. Thank you!

Dim x As Long
    
    x = 0
    
    Range("A40") = TM.Value
    
    Range("B40") = Application.VLookup(Cells(40, 1), Sheets("MISC").Range("A1:B200"), 2, False)
    
    Sheets("CUSTOMER").Activate
    
    Do While Cells(1 + x, 7).Value <> Sheets("TM Call Report").Cells(40, 2).Value
    
        x = x + 1
        
    Loop