Most frustrating program EVER!!!!

[mshaynerush]

Why, oh why, does Excel hate me so? Yesterday, I created a spreadsheet, made my macros, tested my macros several times. Success!! Saved. Opened to day, same machine, same version, just 18 hours later. Bugs Bugs Bugs!!

Here is my code:

Private Sub CancelThis_Click()
Unload Me
End Sub
Private Sub LaneDate_Change()
    If LaneDate.Value = "=" Then
        LaneDate.Value = Date
    End If
    
End Sub
Sub LaneSBL()

    Application.ScreenUpdating = False
    Sheets("Hours").Select
    Range("A2").Select
    
        Do Until ActiveCell = LaneDate
        
        ActiveCell.Offset(1, 0).Select
        
        
        Loop
        

End Sub
Private Sub LaneOk_Click()
Call LaneSBL

    ActiveCell.Offset(0, 9).Select
        
    
    ActiveCell.Value = LaneSBLHr.Value
    
    Sheets("Start").Select
    
Unload Me
End Sub
Private Sub UserForm_Click()
End Sub

 

[mshaynerush]

This is a macro that takes a form data labled as LaneDate, which allows a user to use the = sign to automatically populate today's date. Then, we select the first cell in the column and go down until it finds the same value that was entered into the LaneDate field, then stops, moves over 9 rows to the right, and puts the data in the form field labeled LaneSBLHr into the active cell.

Yesterday at 3:00pm this exact code worked exactly as expected and needed. Now, it loops, goes right past the field where it should stop, and doesn't stop at all. I can't figure out why. Help!