在用戶窗體中設置值combobox =變量

Question

我試圖創建一個循環，檢查前幾周的重複選擇，如果發現任何錯誤，則返回錯誤。我的問題是，當我嘗試從組合框中選取一週並將其分配給變量「weekcount」時，它會返回「Object Required」錯誤。以下是我的代碼：

Private Sub InputButton1_Click() 
Dim Weekcount As Long 

Set Weekcount = UserForm1.Week.Value 

MsgBox Weekcount  

End Sub 

Answer 1

設置僅在分配對象（引用類型）時使用。您分配一個值類型變量，因此它不是必需的（而不是允許）

改用

Weekcount = UserForm1.Week.Value 

，你應該罰款。