Retour sur une boite de dialogue

S

Solcarnus

Guest
Bonjour a tous!!

J'ai un probleme avec une de mes macros Excel pour lequel je n'ai pas trouvé de solution. Je souhaite donner à un utilisateur la possibilité de sauvegarder son fichier en faisant apparaître la boîte de dialogue standard Excel 'enregistrer sous'. Le problème est que si l'utilisateur décide de cliquer sur le bouton annuler, ma fonction se poursuit alors que je ne le souhaite pas.

J'ai utilisé le code suivant, sans succes

..............................................................................................
dlgAnswer = Application.Dialogs(xlDialogSaveAs).Show
If dlgAnswer = VbCancel Then
'traitement 1, on sort de la fonction'
Else
'traitement 2, on poursuit l'execution de la fonction'
End If
................................................................................................

Quelqu'un saurait-il comment on récupère l'information transmise par la boîte de dialogue, à savoir si l'utilisateur à cliquer sur 'enregistrer' ou sur 'annuler'?

Voila j'espère que j'ai été assez clair.

Je tiens à remercier d'avance celui ou celle qui prendra le temps de me lire et de me répondre.
 

myDearFriend!

XLDnaute Barbatruc
Bonsoir Solcarnus,

Tu peux essayer comme ça :
Dim Rep As Boolean
      Rep = Application.Dialogs(xlDialogSaveAs).Show
      If Not Rep Then
            ''traitement 1, on sort de la fonction'
            MsgBox 'Choix Annuler'
      Else
            ''traitement 2, on poursuit l'execution de la fonction'
            MsgBox 'Sauvegarde effectuée'
      End If
Cordialement,
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 913
Messages
2 093 535
Membres
105 752
dernier inscrit
fred13340