Enregistrement feuil excel [Résolu]

abdellah_tadjine 107 Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention - 28 juil. 2017 à 23:25 - Dernière réponse : abdellah_tadjine 107 Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention
- 19 août 2017 à 20:01
Bonjour,
j'ai crée une application de gestion de distribution de prise en charge. avec userfom
tout marche très bien ...l'ajout des données la suppression etc....mon problème c'est que je cherche a introduire un code vba dans un bouton-commande pour la sauvegarde de mon travail, car quand je quitte directement l'application a l'aide de bouton "quitter"
tout mon travail est effacé.....car il faut aller dans la page excel et enregistrer pour quitter. merci pour votre aide
Afficher la suite 
107Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention

4 réponses

Répondre au sujet
0
Utile
3
Bonjour abdellah,

Essaye ceci :


' Si le nom de ton bouton Quitter est "CommandButton1" :

Private Sub CommandButton1_Click()
  ThisWorkbook.Save
End Sub

' Si le nom de ton bouton Quitter est "Quitter" :

Private Sub Quitter_Click()
  ThisWorkbook.Save
End Sub


Autre solution : pas de bouton Quitter, et dans ThisWorkbook :


Private Sub Workbook_BeforeClose(Cancel As Boolean)
  ThisWorkbook.Save
End Sub


En quittant Excel par Fichier / Quitter, ou clic sur croix rouge,
ça sauvegardera ton classeur avant la fermeture de celui-ci.

⚠  Si tu n'as pas l'habitude d'une telle manipulation,
essaye-la d'abord sur un fichier-test.

Cordialement
 
abdellah_tadjine 107 Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention - 29 juil. 2017 à 18:40
merci bcp steve ca marche tres bien.....merci encor
yg_be 4116 Messages postés lundi 9 juin 2008Date d'inscriptionContributeurStatut 11 décembre 2017 Dernière intervention > abdellah_tadjine 107 Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention - 13 août 2017 à 15:12
bonjour, peux-tu marquer le sujet comme résolu? (lien en dessous du titre)
abdellah_tadjine 107 Messages postés jeudi 30 novembre 2006Date d'inscription 18 septembre 2017 Dernière intervention > yg_be 4116 Messages postés lundi 9 juin 2008Date d'inscriptionContributeurStatut 11 décembre 2017 Dernière intervention - 19 août 2017 à 20:01
ok c fait
Commenter la réponse de steve