faire une pause...

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : faire une pause...

treza22

Bonjour!
Je voudrais faire une pause dans mon programme jusqu a ce que l'utilisateur clique sur un bouton "reprendre". Je m explique: j ai un userform avec un bouton "pause" et je veut que quand l utilisateur clique sur "pause", le programme s'arrete pour que l utilisateur puisse changer des trucs sur la feuille excel.
J ai essayé de faire avec l instruction stop. Mais avec stop, le programme s'arrete dans la macro et l'utilisateur n'a pas besoin de voir la macro! En plus, l'utilisateur ne eput rien modifier dans la feuille excel quand le programme est en mode arrêt.
J ai aussi vu l instruction wait or wait est en fonction d un temps. Ce qui ne me convient pas non plus!
Quelqu un saurait quel instruction je pourrais utiliser?
Mecri d avance

Publicité

jerome-gmc

C'est intéressant ce pb, personne peut aider?

dough29

Coucou !!

Moi j'ai ca:

Code :

Public Sub wait(length)
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + length
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.wait waitTime
End Sub

Voilà si ca peu vous aider

Bonne après-midi !

Message édité par dough29 le 16-06-2005 à 14:14:22

jerome-gmc

Ok merci, c'est une solution.

Mais est il possible de stopper le programme en milieu de macro, en laissant l'utilisateur agir, et de la relancer ensuite sans contrainte de temps.

A+

treza22

Merci dough29 mais c est pas ca que je veux...
Je connaissait le wait mais le probleme avec wait c est que il met en pause un temps défini et que pendant ce temps l'utilisateur ne peut pas agir sur l'application.
Je sens que Jerome sait la solution...allez stp, ca m arrangerai beaucoup....mais si tu ne veux pas me donner la reponse, peux tu me donner l adresse d'un site ou chercher ca?

jerome-gmc

Non je ne connais pas la réponse, en fait elle m'interesse.

treza22

c est donc peut etre pas possible?

jerome-gmc

J'ai poster ta question dans le forum suivant:
http://www.excel-downloads.com/forums/2.htm

jerome-gmc

Sur l'autre forum on me demande un exemple concret, et je n'en n'ai pas, tu peux venir pour joindre un fichier, please, merci.

Message édité par jerome-gmc le 16-06-2005 à 15:39:52

treza22

voila c fait! Mais tu as donné une reponse en meme temps...

Publicité

jerome-gmc

Désolé, j'ai fais un copier coller, tu peux peut être joindre un fichier ( zipé <50 MO et sans espace) ça sera plus simple pour tout le monde.

scuny

public ValPause as string

sub attente

UserFormPause.show
do while ValPause = 1
doevents
loop

exit sub

dans le userform un clic sur "pause" doit mettre ValPause a 1

Message édité par scuny le 16-06-2005 à 19:27:10

lepap

bonjour,
je serai bien intéressé pour faire une pause sur mon usage de useform et reprendre excel puis revenir.*il semble que vous ayez trouvé un truc.
pourriez vous me le transmettre.

merci grandement
f

juju2k

Supposons que tu aies ces objets :

Un bouton "BoutonFeuille" sur la feuille Excel
Une UserForm nommé "UserForm1"
Un bouton "Pause" sur UserForm1

Tu te retrouves avec ceci :
BoutonFeuille affiche UserForm1 :

Private Sub BoutonFeuille_Click()
UserForm1.Show
End Sub

BoutonPause cache UserForm1 :

Private Sub BoutonPause_Click()
UserForm1.Hide
End Sub

Message édité par juju2k le 07-03-2006 à 20:35:17

FORUM HardWare.fr

Programmation

VB/VBA/VBS

faire une pause...

Sujets relatifs
PAUSE Imprimante VBS Windows 2000	system("pause") system("cls")
problème de pause sous batch	[Delphi] faire une pause dans un prog ?
[javascript] pause,sleep, ou wait ou rien!	[batch] Pause
pause jusqu'a pression sur une touche	faire une pause
comment mettre en pause un programme pendant son exécution ?	COBOL : comment faire une pause dans le programme ?
Plus de sujets relatifs à : faire une pause...

Page générée en 0.067 secondes