Tempus fugit

[Gruick]

Bonsoir excelents amis,

l'instruction wait me pose un problème.

Application.Wait (Now + TimeValue('0:00:00') + 1)
ou même
Application.Wait (Now) tout simplement

nécessite l'intervention de la touche Echap au clavier pour que la macro reprenne son travail, mais uniquement la première fois qu'elle la rencontre. Après, ça roule tout seul.

Le pire c'est que je l'ai utilisée dans un autre programme, sans intervention humaine. C'était un sous programme d'ailleurs avec un for et un next du genre

sub gruick()
for i = 1 to 100
instruction quelconque
application.wait.....
next i
end sub

Là c'est de ma boucle dont il ne veut plus entendre parler.
Pas comprendre ! nicht verstehend !
Mais ça marchait dans mon autre programme !
En avez-vous le secret de cette maudite ouette ?

Merci d'avance à tous mes bons génies, qui aiment pousser excel dans ses derniers retranchements.

 

[Gruick]

Bonjour à tous mes lecteurs,
La nuit a-t-elle porté conseil ?
Cette commande wait porte bien son nom, on dirait.
Etant autodidacte en vba, je l'ai découvert en la pensant d'abord, en la cherchant après, mais pour l'utiliser correctement et savoir ses secrets...
J'ai confiance.
Je m'y remets illico,
Si je l'apprivoise, je vous tiens au courant.
See you later.

 

[PascalXLD]

Bonjour

as-tu essayé ??

Application.Wait (Now + TimeValue('0:00:01'))

 

[Gruick]

Bonjour,
ça fait une pause d'une seconde, et en appuyant s/Echap, ça redevient plus rapide, c'est ce que je veux.
En fait, c'est pour une animation d'objets (shapes) représentant s/1 tableau les 20 équipes de foot français. C'est assez rigolo à faire, sauf pour ce timing.
On va y arriver...courage.
A+

 

[Gruick]

Eureka !!!
Réflexion, execution...
formule magique, je croyais l'avoir déjà essayé, mais bon..
la voilà :

Application.Wait (Now + TimeValue('0:00:00'))

c'est bête hein !
Ne rien rajouter, mais lui dire, ce n'est qu'une machine après tout.
Garçon, un triple Whisky !!!

 

[Hervé]

salut gruik, pascal

en pièce jointe une petite démo pour les déplacements animées des shapes.

si cela peut-etre utile gruik.

salut [file name=gruik.zip size=9351]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/gruik.zip[/file]

 

[Gruick]

Heureux de te relire Hervé,
Mon souci n'était pas le déplacement, mais le timing.
Merci quand même, il y a des astuces dont je me servirai sans doûte.

Les déplacements fluctuent selon les points acquis jour après jour.
La sélection de shapes selon l'équipe...
Tu vois l'usine à gaz...450 Ko, mais c'est beau et rapide malgré son poids.
Tout ceci est résolu, et mon programme principal tient en 20 lignes, les 4 autres sont des initialisations selon le sens ou la durée que je lui propose.(4 lignes max.)
L'Intel Celeron sent un peu le roussi...

Vu les performances de Lyon, je vais acheter un écran plus large...
A plus Hervé, et encore merci à tous, V13 est un jour de chance.