none
Message "Veuillez patienter" RRS feed

  • Question

  •  

    Bonjour,

     

    Je souhaire faire afficher un message de type "chargement en cours, veuillez patienter" au sein d'une macro Excel VBA.

    Y atil un moyen simple de faire ceci (au moyen d'un MsgBox par exemple) ou bien dois-je la crééer de toute pièce et piloter son activation/désactivation ?

     

    Vous remerçiant par avance

    dimanche 11 janvier 2009 11:14

Toutes les réponses

  • finalement en cherchant un peu..

     

    Il faut se faire une petite fenetre que j'ai nommé WaitBox, qui contient just un libéllé "Veuillez Patiener", et dont le Caption est "Chargement en cours"

     

    Puis dasn le bouton qui va déclencher le TRAITEMENT il faut faire:

     

    Application.Cursor = xlWait   'affiche le sablier
    WaitBox.Show vbModeless   'affiche la waitbox mais continu le traitement
    WaitBox.Repaint


    ...TRAITEMENT...

       
    WaitBox.Hide  'masque la waitbox
    Application.Cursor = xlDefault 'remet le curseur par défaut
    MsgBox "Chargement effectué ", vbInformation

     

    dimanche 11 janvier 2009 14:17