Change Textbox Value based on another Textbox

[Alrabia]

Hi,
I have a User form with text boxes. I am looking to have Emp10 autofill with either "Rented" or "Expired". If I have value in Emp6 with an upcoming date then Emp10 should show "Rented" and if Emp6 has a Due date then it should show "Expired" in Emp10. Emp6 is used to input date.​

 

[Norie]

Try this.

Private Sub Emp6_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    If DateValue(Emp6.Value) < Date Then
        Emp10.Value = "Expired"
    Else
        Emp10.Value = "Due"
    End If
    
End Sub