1

Я прочитал несколько похожих тем, но рисую пустым. У меня открыто 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 ответ1

0

В коде UserForm -

Private Sub UserForm_Deactivate()
    Unload.me
End Sub

Разгружается при потере фокуса.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .