Userform Textbox1 = Val(Textbox2.Value) / 2

[Excelnoub]

Good day,
Looking for a code on my Userform. I have 2 textboxes, Textbox1 and Textbox2. I want to, when the user add a number in Textbox1 to show in my textbox2 the value (numeric) but divided by 2.

Example:

Textbox1 = 10 then Textbox2 = 5

I have this following code but doesn't seem to work:

Private Sub TextBox2_AfterUpdate()
Textbox2.Value = Val(Textbox1.Value) / 2
End Sub