使用者窗體保留在所有工作簿中。我怎麼才能阻止這個?

使用者窗體保留在所有工作簿中。我怎麼才能阻止這個?

我讀過一些類似的帖子,但我一片空白。我打開了 2 個工作簿,當我點擊開啟使用者窗體的工作簿以外的工作簿時,使用者窗體仍然存在。

我有這段程式碼,它可以為建立使用者窗體的工作簿執行我想要的操作。但是當我單擊另一個工作簿時,使用者窗體仍保留在螢幕上。我怎麼才能阻止這個?

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    If Sh.Name <> "HTFD" And Flight_Deck.Visible = True Then
        Unload Flight_Deck
    End If
    If Sh.Name = "HTFD" And Flight_Deck.Visible = False Then
        Flight_Deck.Show vbModeless
    End If
End Sub

答案1

在使用者窗體程式碼中 -

Private Sub UserForm_Deactivate()
    Unload.me
End Sub

失去焦點時卸載。

相關內容