Userform textbox and calendar formula

[jmaocubo]

Hello
I need your help ....

I have 2 calendar and a textbox in a userform, I need that when I put a number in the textbox, on the second calendar is + 1 / 3 (days) of the first calendar.

I used this code, but only allows me to move the number of days of the textbox.
Private Sub Calendar1_Click()

With Calendar1
Calendar5.Value = Calendar1.Value + TextBox1.Value
End With

Thanks in advance

[Bob Phillips]

Private Sub Calendar1_Click()

With Calendar1
Calendar5.Value = Calendar1.Value + (TextBox1.Value \ 3)
End With

[jmaocubo]

thanks :)

was doing well and missed () between textbox