[Résolu] UserForm avec 2 commandbutton insérée dans une macro beforeclose

C

Compte Supprimé 979

Guest

• 21 Juillet 2011

• #2

Re : Aide finale : UserForm avec 2 commandbutton insérée dans une macro beforeclose

Salut Sliverystic,

Pourquoi utiliser un USF pour répondre OUI/NON ?

Tu ne pourrais pas joindre ton fichier modèle ?

A+

 

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 21 Juillet 2011

• #3

Re : Aide finale : UserForm avec 2 commandbutton insérée dans une macro beforeclose

Bonsoir Sliverystic, BrunoM45, le Forum,

Pour rejoindre le raisonnement de Bruno, je te propose de remplacer ton formulaire par un MsgBox. Ton code deviendrait alors :

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Rep = MsgBox("Pas de possibilité de sauvegarde, voulez vous fermer le fichier?", vbYesNo + vbQuestion, "FIN DU PROGRAMME")
If Rep = vbNo Then
  Cancel = True
  Else
  With Application.CommandBars("Standard")
    .Controls("Enre&gistrer").Enabled = True
  End With
  With Application.CommandBars("Worksheet Menu Bar")
    .Controls("Fichier").Enabled = True
  End With
End If
End Sub

J'ai testé, ça fonctionne.

Cordialement.

 

Vote positif 0 Vote négatif

S

Sliverystic

Guest

• 22 Juillet 2011

• #4

Re : Aide finale : UserForm avec 2 commandbutton insérée dans une macro beforeclose

BrunoM45, Papou-net,

Je vous remercie pour votre aide.

Papou-net, ton code me permet d'obtenir la fonctionnalité que je souhaite, je te remercie vivement.

BrunoM45, j'ai souhaité mettre une usf pour insérer une image dans l'encart lors de la fermeture

En tous les cas, Papou-net, ta solution est très fonctionnelle, tu me permets d'atteindre le but souhaité.

Je vous remercie donc tous deux pour cette aide !
Cordialement,

PS : je n'ai pas trouvé comment mettre une balise "résolu"

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Juillet 2011

• #5

Re : Aide finale : UserForm avec 2 commandbutton insérée dans une macro beforeclose

Bonjour à tous,

PS : je n'ai pas trouvé comment mettre une balise "résolu"

Cliquez pour agrandir...

tu édite ton premier messagge et modifie l'objet, mais cela n'est pas obligatoire sur ce forum...

bonne journée
@+

 

Vote positif 0 Vote négatif

S

Sliverystic

Guest

• 22 Juillet 2011

• #6

Re : [Résolu] UserForm avec 2 commandbutton insérée dans une macro beforeclose

Merci Pierrot93 🙂

 

Vote positif 0 Vote négatif