使用VBA在Excel用户表单文本框中Excel

Question

我希望从上面的textbox1退出时填充textbox2的值，但VBA代码不起作用。

Private Sub textbox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    textbox1.Value = Format(textbox1.Value, "dd/mm/yyyy")
    textbox2.Value.Formula = "=Right(if(month(textbox1.value)>3,Year(textbox1.value)+1,Year(textbox1.value)),2)" 
End Sub