Bonjour Dan, Petchy, le Forum
Je te remercie Dan pour le lien vers ce fil, mais par contre au regard de ce qu'à écrit Petchy je peux déjà dire deux choses :
"est il possible d'afficher un Msgbox avec une barre de progression"
=> Non, pas de ProgressBar dans un MsgBox, uniquement dans un UserForm.
"j'ai un commandbutton pour quitter et enregistrer"
=> Non, j'ai déjà répondu que les ProgressBar ne peuvent fonctionner qu'au cours d'une boucle permettant une incrémentation de la progression. L'action d'enregistrement ne permet pas d'incrémenter une ProgressBar MSForm2.0
Par conséquent soit Petchy se contente de la barre de progression existant dans la Barre de Status qui, elle, fonctionne avec Windows et comprend l'enregistrement. Soit il se contente d'un UserForm qui indiquera "veuillez patienter pendant l'enregistrement" comme ceci :
Private Sub CommandButton1_Click()
UserForm1.Show 0
DoEvents
ThisWorkbook.Save
Unload UserForm1
ThisWorkbook.Close 0
End Sub
NB l'affichage du UserForm en mode non-modal étant impérative, cette méthode ne fonctionnera que sous Excel 2000 et +
Bon Dimanche
@+Thierry
