VBA錯誤：對象變量或與塊變量未設置

Question

VBA錯誤：對象變量或與塊變量未設置

我不知道剛剛發生了什麼！請幫忙。這是我的代碼！

If intMsgBox = vbYes Then 
Unload frmNewOrder // error here 
Unload Main_Menu //error here 
ActiveSheet.PrintPreview 
wkbNewOrder.Worksheets("New Order").Select 
wkbNewOrder.Worksheets("New Order").Delete 
wkbNewOrder.Worksheets("Main Menu").Select 
End If 

Answer 1

As explained in the documentation，既不MAIN_MENU也不frmNewOrder設定。

該鏈接的屏幕截圖。如果上述鏈接死亡。

Answer 2

看起來你宣佈frmNewOrder作爲變量，但你沒有把它和你的代碼如下所示：

Dim MyForm As UserForm1 
Unload MyForm 

但應改爲：

Dim MyForm As UserForm 
Set MyForm = UserForm1 
Unload MyForm