UserForm은 모든 통합 문서에 계속 존재합니다. 어떻게 하면 이것을 멈출 수 있나요?

UserForm은 모든 통합 문서에 계속 존재합니다. 어떻게 하면 이것을 멈출 수 있나요?

비슷한 스레드를 읽었지만 공백을 그립니다. 2개의 통합 문서가 열려 있고 사용자 양식을 여는 통합 문서가 아닌 다른 통합 문서를 클릭하면 사용자 양식이 그대로 유지됩니다.

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

포커스를 잃을 때 언로드됩니다.

관련 정보