UserForm bleibt in allen Arbeitsmappen vorhanden. Wie kann ich das verhindern?

UserForm bleibt in allen Arbeitsmappen vorhanden. Wie kann ich das verhindern?

Ich habe einige ähnliche Threads gelesen, aber mir fällt nichts ein. Ich habe zwei Arbeitsmappen geöffnet und wenn ich auf eine andere Arbeitsmappe als die klicke, die das UserForm öffnet, bleibt das UserForm bestehen.

Ich habe diesen Code, der das gewünschte Ergebnis für die Arbeitsmappe erzielt, in der das Benutzerformular erstellt wurde. Das Benutzerformular bleibt jedoch auf dem Bildschirm, wenn ich auf eine andere Arbeitsmappe klicke. Wie kann ich das verhindern?

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

Antwort1

Im UserForm-Code -

Private Sub UserForm_Deactivate()
    Unload.me
End Sub

Wird entladen, wenn der Fokus verloren geht.

verwandte Informationen