☰

UserForm остается во всех рабочих книгах. Как это остановить?

tag-icon • tag-icon microsoft-excel vba
UserForm остается во всех рабочих книгах. Как это остановить?

Я читал несколько похожих тем, но ничего не понял. У меня открыто 2 книги, и когда я нажимаю на книгу, отличную от той, которая открывает UserForm, UserForm остается.

У меня есть этот код, который делает то, что я хочу для рабочей книги, в которой была создана UserForm. Но UserForm остается на экране, когда я щелкаю на другую рабочую книгу. как мне это остановить?

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

В коде UserForm -

Private Sub UserForm_Deactivate()
    Unload.me
End Sub

Выгружается при потере фокуса.

Связанный контент