VBA将日期转换为基于文本框输入的数字

Question

我正在制作用户表单。将打开一个输入框，用户将输入一个月。然后打开userform，将该月输入textbox3。我希望文本框1为1和那个月的数字形式。我尝试了几种类型的代码，但我对vba还不熟悉。

帮助将不胜感激。 这是我试过的代码。

TextBox1=MONTH(DATEVALUE("1"&TextBox2.value))

Answer 1

使用TextBox2中的December，使用

 TextBox1 = "1" & Month(DateValue("1-" & TextBox2.value))

TBH，我真的不相信我的用户正确拼写月份名称，而是让他们从列表中选择。