VBA AddDate基于userform条目

时间:2017-07-11 15:00:29

标签: vba

我试图用userform操纵日期。 userform有一个文本框,您可以在其中输入日期,然后我有一个下拉列表,您可以在其中选择一个数字。

您选择的数字决定了该日期的加入月数。如果你把1/1并选择3,那么你应该得到4/1/2017。问题是,当我使用AddDate函数时,它不会让我使用它:

AddDate("m", Userform1.ComboBox1.Value, Userform1.TextBox1.Value)

它不会让我从userform中提取值。任何建议都非常感谢。

1 个答案:

答案 0 :(得分:0)

试试这个:

With UserForm1
    .TextBox1.Value = DateAdd("m", .ComboBox1.Value, CDate(.TextBox1.Value))
End With