Discussion :

[Nana-Didi]

Bonsoir!
Je voudrais savoir : comment on fait pour qu'un Userform se lance automatique à l'ouverture du classeur? Il me semble que c'est autorun mais je sais pas trop où le mettre pour que ça fonctionne.

Je voudrais aussi savoir : comment on fait pour qu'excel se ferme quand on quitte un certain userform? Merci d'avance

[zyhack]

Bonsoir

pour l'affichage du userForm à l'ouverture du classeur

dans ThisWorkbook

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Workbook_Open()
  UserForm1.Show
End Sub

pour la fermeture du fichier je n'ai pas trouvé de solution, si quelqu'un a une idée.

[Didier Gonard]

Bonjour,

Dans le module de l'USF :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
'ThisWorkbook.Close 'savechanges comme tu veux..
 
With Application
   .DisplayAlerts = False
   .Quit
End With
End Sub

Attention c'est brutal, veiller à maîtriser les conséquences !

On considère ici que l'USF est fermé avec la croix, si c'est par code, c'est toi qui dirige, donc no soucis.

cordialement,

Didier

[laetitia]

bonjour, une variante!!!!!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ActiveWorkbook.Close False 'pas sauve
ActiveWorkbook.Close True 'sauve
If Workbooks.Count > 1 Then ActiveWorkbook.Close Else Application.quit