Bouton enregistrer oui non

Résolu
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -  
surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
je voudrais avoir le code pour enregistrer mon classeur avec bouton enregistrement oui ou non
car celui que j'ai ne m'enregistre pas bien et je perds mes mises a jour
urgent svp
merci
a bientot

3 réponses

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,

    Oui mais sur quelle application et quelle version ?

    ensuite je pense que tu veux une boite de dialogue avec 2 boutons, enregistrer oui et non
    Mais si c'est non que faut il faire fermer le fichier sans enregistrer ?
    0
    1. surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
       
      bonjour
      c'est avec excel 2010 oui c'est exactement ça
      merci
      0
  2. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    Crée un bouton ActiveX sur ta feuille et colle ce code dans les propriétés du bouton

    Private Sub CommandButton1_Click()
    Select Case MsgBox("Enregistrer les modifications", vbYesNo, "Que voulez vous faire ?")
    Case vbYes
    ThisWorkbook.Save
    Case vbNo
    ActiveWorkbook.Close False
    End Select
    End Sub

    Avec le bouton Oui on enregistre sans fermer le fichier, mais il est possible d'intégrer la fermeture du fichier ou d'Excel
    avec le bouton Non on ferme sans enregistrer

    https://www.cjoint.com/c/CABvhuMXIIC

    A+
    Mike-31

    Une période d'échec est un moment rêvé pour semer les graines du savoir.
    0
    1. surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
       
      Re
      je voudrais enregistrer et fermer
      le quel je modifie?
      0
    2. surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
       
      bonsoir
      merci j'ai résolu mon problème
      bonne soirée
      a bientot
      0
  3. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    Je te donne ce code qui ferme Excel après enregistrement et j'arrête la cette discussion

    Private Sub CommandButton1_Click()
    Select Case MsgBox("Enregistrer les modifications", vbYesNo, "Que voulez vous faire ?")
    Case vbYes
    ThisWorkbook.Save
    Application.Quit
    Case vbNo
    ActiveWorkbook.Close Falseê
    End Select
    End Sub

    A+
    Mike-31

    Une période d'échec est un moment rêvé pour semer les graines du savoir.
    0
    1. surplus Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   4
       
      Re
      merci
      0