在userform中设置值组合框=变量

Question

我正在尝试创建一个循环来检查重复项的前几周选择，如果找到则返回错误。我的问题是，当我尝试从组合框中取出选定的一周并将其分配给变量'weekcount'时，它会返回一个'Object Required'错误。以下是我的代码：

Private Sub InputButton1_Click()
Dim Weekcount As Long

Set Weekcount = UserForm1.Week.Value

MsgBox Weekcount      

End Sub

Answer 1

Set仅在分配对象（引用类型）时使用。您正在分配值类型变量，因此不需要（也不允许）

改为使用

Weekcount = UserForm1.Week.Value

你应该没事。