J'ai un souci car quand je lance mon fichier je masque le classeur en question ainsi que tous les classeurs ouverts par d'autres fichiers. Puis quand je le ferme ( à savoir la croix de l'userform ) tous les dossiers se ferment.
Les codes sont:
Pour masquer le classeur.
Code:
Private Sub Workbook_Open()
Application.Visible = FalseUserForm1.Show
End Sub
Pour fermer le fichier:
Code:
Private Sub UserForm_QueryClose( Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then
Application.Quit
End If
End Sub
Merci Pierrot
déjà ça m'évite de fermer tous les classeurs ( c'est un bon point...). Par contre quand j'ouvre mon classeur pour ne faire apparaitre que l'userform1, tous les classeurs se masquent je sais que c'est un problème avec Application.Visible = False
Mais je ne trouve pas d'autres fonctions pouvant masquer mon classeur.