XL 2019 MsgBox temporaire

[gg13]

Bonjour,
J'utilise une listbox dans un Userform qui se met à jour après un calcul assez long.
Ce calcul est lancé par un bouton.
Est-il possible d'afficher un message d'attente qui se referme tout seul à la fin du calcul.
Merci
GG13

 

[TooFatBoy]

Bonjour,

Avec une MsgBox je ne sais pas faire, mais tu peux afficher un UserForm avant le calcul, et le fermer après le calcul.

 

[gg13]

merci TooFatBoy
Cette solution est pratique, je pensais aussi utiliser un StatusBar.
Mais la solution la plus simple serait le MsgBox automatique.
GG13

 

[TooFatBoy]

Mais la solution la plus simple serait le MsgBox automatique.

Tout est relatif...

 

[gg13]

le MsgBox ne se referme pas aprés calcul.
pour l'ouvrir j'utilise USF.Show

mais pour le fermer USF.Quit ou UNLOAD ne fonctionne pas ??

GG13

 

[TooFatBoy]

le MsgBox ne se referme pas aprés calcul.

C'est l'inconvénient de la MsgBox, sans bidouille elle ne se ferme pas toute seule.

pour l'ouvrir j'utilise USF.Show

mais pour le fermer USF.Quit ou UNLOAD ne fonctionne pas ??

Perso, j'utilise généralement .Hide mais je ne sais pas si c'est ce qu'il y a de mieux...

 

[Dudu2]

Bonjour,
Un fichier qui contient:
- Module_ShowTextBox à importer dans le projet
- Module_Test à consulter comme exemple d'utilisation.

 

[Dudu2]

Ou le même mais avec une Shape paramétrable au lieu d'une TextBox pour faire plus original.

 

[Dudu2]

Mais si tu sais évaluer l'avancement de ton calcul, le mieux c'est de mettre une barre de progression.
Perso j'utilise celle-la faite par une certain @Dudu2, mais il y en a d'autres dont celle de @sylvanu qui va en StatusBar.

 

[gg13]

Bonjour
Dudu2
Merci pour tes différentes solutions, je vais tester dès que possible.
A+
GG13

 

[gg13]

Dudu2

Pour la solution avec barre de progression ( celle que je voudrais utiliser) .
Comment incorporer le USF barre de progression, il n'est pas dans la boite à outils.

Pour la solution avec message clignotant la macro tourne mais le message ne s'affiche pas sur la feuille
et de plus au final ce sera sur un USF ouvert.
GG13

 

[Dudu2]

@gg13,

Comment incorporer le USF barre de progression, il n'est pas dans la boite à outils.

Je ne comprends pas pourquoi tu ne le vois pas:

Tu incorpores ce UserForm dans ton projet (en le sélectionnant / glissant vers ton projet) et tu t'inspires du Module_Test pour la mise en œuvre.
Attention: c'est ton code qui fait progresser la barre en fonction de ce que tu lui indiques, elle ne progresse pas toute seule.

Pour la solution avec message clignotant la macro tourne mais le message ne s'affiche pas sur la feuille

Pourtant ça me parait pas très simple à utiliser. Mais bon, y a sans doute une souci...

 

[Dranreb]

Bonjour.

'utilise une listbox dans un Userform qui se met à jour après un calcul assez long.

La première chose à faire c'est de vérifier s'il est bien écrit de façon à être le plus rapide possible.
Le plus souvent ce n'est pas le cas.
Sinon un Label dans l'Utilisateur peut afficher "Tache en cours" au début et "Tâche terminée" à la fin.
J'ai aussi un UFmProg qui affiche une barre d'activité, une autre de progression, le temps restant et l'heure probable de fin. Il se met en œuvre facilement dans n'importe quelle procédure pourvu que le nombre de passage dans une boucle puisse être déterminé d'avance.

 

[gg13]

Dudu2
Je voudrais bien le glisser mais un disque rouge style sens interdit s'affiche !!!!
gg13

 

[Dudu2]

@gg13,
Je ne sais pas quoi tu dire. Laisse tomber.
Essaie le système de @sylvanu que j'ai mis en lien aussi.
Ou l'UFmProg de @Dranreb.