O UserForm permanece presente em todas as pastas de trabalho. Como posso parar isso?

1

Eu li alguns tópicos semelhantes, mas estou desenhando um espaço em branco. Eu tenho 2 pastas de trabalho abertas e quando clico em uma pasta de trabalho diferente daquele que abre o formulário de usuário, o formulário de usuário permanece.

Eu tenho esse código que faz o que eu quero para a pasta de trabalho em que o formulário de usuário foi criado. Mas o UserForm permanece na tela quando clico para outra pasta de trabalho. como posso parar isso?

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
    
por Emark 13.04.2018 / 16:41

1 resposta

0

No código do UserForm -

Private Sub UserForm_Deactivate()
    Unload.me
End Sub

Descarrega ao perder o foco.

    
por 23.04.2018 / 00:11