VBA Excel
par  Chacalou13 | Statut : Non résolu
vendredi 15 octobre 2004 à 12:11:46 |
salut,
Lors d'un long traitement, je veux afficher une boite de dialogie d'attente pour l'utilisateur. Le code est le suivant (c'est pas moi qui l'ai crée):
Sub Maj_Doc()
Application.Cursor = xlWait 'affiche le sablier
WaitBox.Show vbModeless 'affiche la waitbox mais continu le traitement
WaitBox.Repaint 'raffraichit le contenu affiché sinon on a une boite blanche vide
Application.MaxChange = 0.001
ActiveWorkbook.PrecisionAsDisplayed = False 'Mise à jour du document
ActiveSheet.Calculate
WaitBox.Hide 'masque la waitbox
Application.Cursor = xlDefault 'remet le curseur par défaut
End Sub
PROBLEME: Le mot clé vbModeless est inconnu, donc je le supprime. Mais alors mon traitement (en gras) ne s'effectue pas tant que je ne ferme pas la boite de dialogue (WaitBox).
Savez vous comment je peux afficher cette WaitBox en continuant ke traitement par ailleurs.
Merci bcp
Grève de la signature
