fermer application par USF

[jeffe]

Bonjour à tous et toutes j'ai un leger soucis
un usf se lance à l'ouverture de mon application,l'application visible passe à false et ne laisse voir que l'usf. un bouton me permet de rendre l'aplication visible mais si qqun se sert de la croix du usf, il se ferme mais pas l'appli.
Je souhaiterais donc fermer l'appli si la croix du usf est activée.
Merci
ps je souhaiterai conserver la croix du usf.

 

[soft]

Bonjour Jeffe, le forum,

Place ton code pour fermer dans la procédure :

UserForm_Terminate

Par exemple :

Private Sub UserForm_Terminate()
    ActiveWorkbook.Close
End Sub

 

[jeffe]

Bonjour, je viens d'essayer ton code mais excel est toujours actif dans le gestionnaire des taches. j'ai essayé application quit mais ne fonctionne pas non plus.

 

[PascalXLD]

Bonjour

Souvent le mieux c'est qu'excel soit toujours actif pour éviter de fermer l'appli alors que d'autres fichiers excel etaient ouverts en arrière plan. Surtout si ton appli doit être diffusée

 

[soft]

Re-bonjour, Bonjour Pascal,

J'ai pensé comme Pascal te le conseille que tu voulais fermer que ton appli.

Pour fermer Excel, remplace

ActiveWorkbook.Close

par

Application.Quit

 

[PascalXLD]

RE

Comme je te le disais tout à l'heure et soft te la rappelé : préviens bien tes users de ne pas ouvrir de fichier excel avant ton appli si ils ne veulent pas avoir de mauvaises surprises......

 

[jeffe]

Merci de ce conseil tu as entièrement raison du coup, sur userform terminate, je rends mon appli visible.
Merci pour vous conseils joints.bonne journée.