1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Procédure SENDKEYS sur vba pose problème [Résolu]

Signaler
Messages postés
4
Date d'inscription
samedi 8 mars 2008
Statut
Membre
Dernière intervention
19 mai 2010
 -
Messages postés
4
Date d'inscription
samedi 8 mars 2008
Statut
Membre
Dernière intervention
19 mai 2010
 -
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

Sendkeys mot_trouve(s, 1),true
Sleep 1
DoEvents
Sendkeys "{ENTER}",true
Sleep 10

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

2 réponses

Réponse 1 / 2
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
 76
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)
Réponse 2 / 2
Messages postés
4
Date d'inscription
samedi 8 mars 2008
Statut
Membre
Dernière intervention
19 mai 2010
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
Répondre Posez votre question