Bonjour tout le monde je m'explique j'ai fait un programme me calculant des mots pou un jeu de scrabble, je dois ensuite les envoyer d'excel à un site internet, pour cela j'envoi via ce code
For s = nb_mots To 1 Step -1
Worksheets(4).Cells(s, 19) = mot_trouve(s, 1)
AppActivate ("test"), 1000
DoEvents
AppActivate ("dictionnaire")
DoEvents
Worksheets(4).Cells(s, 20) = mot_trouve(s, 2)
Next
ce code fonctionne dans le sen ou il envoye les infos au site internet cependant il lui arrive très souvent de ne pas envoyer la premiere ou les deux premieres lettres de chaque mots, comme si l'envoi était envoyé trop tot qu'en dites vous comment pourrais-je corriger ça
(Précision je suis sur office 2007)
Par avance merci à vous
lazarre fan d'egypte ancienne
Salut
Que signifient le "1000" derrière le AppActivate("test") ?
Le paramètre Wait de cette fonction attend un Booléen, False ou True
Avec 1000, tu dis True, mais cela ne représente pas une durée de temps.
Pour ton problème, il semble que tu envoies un texte que tu valides à chaque tour.
Cela implique un rafraichissement de la page internet en question.
Donc, ton Sleep de 10 mSec semble bien court !
Vala
Jack, MVP VB NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
je viens effectivement de m'apercevoir qu'il atend un booleen, je verifie et vous dis quoi, en tout cas je te remercie pour tes conseils, je teste et reviens ici ensuite
lazarre fan d'egypte ancienne