用戶窗體關閉工作簿

Question

我在Excel中創建了用戶窗體，因此當我打開xlsm文件時，它只會打開用戶窗體並隱藏工作簿。

但是，當我用[X]按鈕關閉用戶窗體時，我希望它在不保存的情況下關閉工作簿和用戶窗體。

當我現在關閉用戶表單並嘗試再次打開同一個文件時，它表示它已經打開/ stil。

啓動代碼：

Private Sub Workbook_Open() 
Application.Visible = False 
Fordelinger.Show vbModeless 
End Sub 

關閉代碼：

Private Sub Fordelinger_Deactivate() 
Application.Quit 
Workbooks("EstimatDOK.xlsm").Close True 
End Sub 

誰能幫助？ :)

Answer 1

您可以使用下面的代碼來限制關閉（X）按鈕

或

Private Sub UserForm_Terminate() 
    ThisWorkbook.Close savechanges:=False 
    Application.Quit 
End Sub 

Answer 2

可能是你想在用戶窗體代碼窗格此代碼

Private Sub UserForm_Terminate() 
    ThisWorkbook.Close 
End Sub