Bonjour le forum,
Dans mon classeur j'ai deux Userform:USF1 qui s'ouvre à l'ouverture du classeur,USF2 à sa fermeture et dure 2 secondes avant de disparaître.Mon problème est le suivant:
J'ai placé un commandbutton "Quitter" dans USF1 pour fermer le classeur avec le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ActiveWorkbook.Close
Ceci a pour effet de figer USF2 et le classeur ne se ferme pas.
Dans ThisWorkbook j'ai mis
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Private Sub Workbook_BeforeClose(Cancel As Boolean)
USF2.Show
Application.Wait Now + TimeValue("00:00:02")
End Sub
Merci d'avance