Msgbox VBA + timer

Fermé

Dergoshine - 22 août 2011 à 12:00
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 24 août 2011 à 23:40

Bonjour,

Voilà j'aimerais que lorsque l'on clique sur mon bouton sur ma feuille excel, une msg box se lance, demande de faire patienter l'utilisateur et se referme au bout d'un laps de temps prédéfini avant d'afficher un résultat.

Si c'est possible, j'aimerais que l'utilisateur puisse voir la minuterie sur la msgbox (par exemple les secondes s'écouler) et qu'au bout du temps écoulé la msgbox se ferme toute seule pour afficher le résultat.

Merci d'avance pour votre aide.

A voir également:

Msgbox timer
Shutdown timer - Télécharger - Personnalisation
Multi timer - Télécharger - Bureautique
Sleep timer tv tcl - Forum Téléviseurs
Minuterie télévision TCL séries P73 - Forum Téléviseurs
Msgbox vbokcancel ✓ - Forum VB / VBA

3 réponses

Réponse 1 / 3

Fallentree Messages postés 2309 Date d'inscription mercredi 25 février 2009 Statut Membre Dernière intervention 22 juillet 2019 209
22 août 2011 à 13:47

il faut pas rever tu auras pas d interaction dans une msgbox ...
il faut ouvrir une nouvelle fenetre avec un timer d un seconde pour afficher l heure et un test sur le cumul ...
c est simple mais bon vb connait plus trop bien. c est des evenements onclick onload qu il faut gerer ...

Réponse 2 / 3

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 754
22 août 2011 à 14:07

Bonjour,
C'est juste pour obliger l'utilisateur à attendre, ou tu veux qu'une procédure se déroule pendant le décompte?

Dergoshine
22 août 2011 à 14:28

C'est juste pour le faire attendre, aucune procédure pendant l'attente

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 754
22 août 2011 à 14:42

MsgBox temporaire :
Sources Code :

CreateObject("Wscript.shell").Popup "Mon Texte", 3, "Le Titre"

3 = 3 secondes.....

Pour afficher un compte à rebours, il ne faut plus utiliser une MsgBox, mais la fabriquer soi-même grâce aux UserForm. Les sources et le code à utiliser :

Dim i As Integer
 
With UserForm1
    .Show 0
    For i = 10 To 0 Step -1
        Application.Wait Now + TimeValue("00:00:01")
        .Label1 = i
        .Repaint
    Next
End With

exemple

Dergoshine
22 août 2011 à 14:51

Ok j'ai testé le premier code, la fenetre ne disparait pas au bout de 3 secondes, elle ne disparait pas du tout d'ailleurs, il faut appuyer sur OK pour la faire disparaitre...

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 754
Modifié par pijaku le 22/08/2011 à 15:14

essaye à nouveau... Ca m'a fait ça aussi la première fois. Ce code nécessite peut être l'enregistrement du classeur...

Dergoshine
22 août 2011 à 15:20

J'ai crée une fonction dans le module et c'est là que j'ai mis le code que tu as indiqué, ensuite j'ai pris mon bouton et j'ai fait Call + nom de ma fonction crée, mais ça ne marche pas

Réponse 3 / 3

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 256
Modifié par eriiic le 24/08/2011 à 23:42

Bonsoir,

pijaku ayant dû s'absenter il m'a demandé de prendre le relais sur ta question.
Chez moi non plus (2003) son fichier ne fonctionne pas comme prévu.

Voici une autre proposition largement inspiré du site de Jacques Boisgontier :
http://boisgontierjacques.free.fr/pages_site/formulairebases.htm#barreAttente

Le temps défile mais pour cela la boite de dialogue doit être non modale.
Ce qui implique que l'utilisateur peut utiliser/modifier le classeur pendant son affichage.
A part ajouter une protection maximales des feuilles avant l'affichage de la boite de dialogue et enlever ces protections après sa suppression je ne vois pas d'autres solutions.
Sinon renoncer à afficher le temps. A moins que qcq'un sache rendre active une boite de dialogue... Je n'ai pas trouvé et il est tard ;-)

http://www.cijoint.fr/cjlink.php?file=cj201108/cijqMbBdKe.xls

eric

Discussions similaires

créer un timer en C

Utilisateur anonyme - 27 nov. 2007 à 21:57
Utilisateur anonyme - 28 nov. 2007 à 20:46

Salut,
J'essaye de créer un timer en C, j'ai trouvé avec google sauf que, mon timer prend 100% du CPU (c'est une boucle infinie).

SVP, comment créer un timer en C (sous console) qui m'évite d'occuper tout mon CPU?

PS: Je suis sous windows.

D'avance merci.

[VB]MsgBox avec variable

Bonjour,
Je suis débutant avec VB et jessai de faire quelque chose d'assé simple avoir une Msgbox qui affiche le resultat de deux variable et de du texte.
ex: MsgBox Varialble1"texte1"&Variable2"texte2"
Mais j'ai un Compile error Expected:end of statment qui apparait autour du texte 1.je sais que ca doit etre simple mais quelqu'un peut m'aider?

afficher MessageBox avec java

Bonjour,
je veux connaitre comment afficher un message avec java ?
aussi le bibliothéque

ce script ne fonnctionne pas MessageBox.Show("message...........");

merci

Msgbox dans un .bat

Bonjour,

Dans un bat j'arrive a afficher une msgbox "passive" grace a la manipe suivante :

echo MsgBox "Voulez-vous continuez ?", vbOKOnly + vbCritical, "Continuer" >> msg.vbs
call msg.vbs
del msg.vbs

- Je cree un fichier msg.vbs avec la ligne de code puis je suprime le fichier a la fin.

Je voulais savoir si c'etait possible de faire la même chose mais avec un "Choix" par exemple "Oui / Non" et reutiliser ce choix dans le .bat

Merci beaucoup !
Bonne journée

msgbox = range value

Salut les amis ,

Je souhaite ajouter une ligne à la fin d'une macro pour avoir :
une msgbox dont le texte est le contenu de la cellule "D13" de la feuille "acc"

Cordialement