Hey folks,

I'm attempting to add in some VBA to a sheet with multiple buttons and forms and I'm a bit stumped.

I'm attempting to do the following:

Based on changes made to the form, if the user inputs a value in any cell from B53:B102 (ID # field), I want the corresponding Start Date field (E53:B102) on the same row to reflect today's date - but only if the start date is empty to begin with.


I've added the following code to Worksheet_Change:

Dim Rng1 As Range, Rng2 As Range
Set Rng1 = Range("$B$53:$B$102")
    For Each Rng2 In Rng1
        If Rng2 <> "" Then Rng2.Offset(0, 3) = Now()
    Next Rng2

End Sub
However, this takes the change into a loop and the application crashes and doesn't necessarily take the existing filled dates into consideration.

Any help would be appreciated.

Thanks in advance!