Bonjour,

Je n'arrive pas à envoyer des données ou touches sur une page web par Sendkeys : existe-t-il un autre moyen ?
Merci,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
'Déclaration des variables
Dim IEdoc As HTMLDocument
Dim IE As Object
' ouvrir la page
Set IE = CreateObject("internetexplorer.application")
IE.navigate "https://www.developpez.com/"
IE.Visible = True
WaitIE IE ' attendre le chargement
Set IEdoc = IE.document
Aucune des lignes ci-dessous ne fonctionne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
ie.SendKeys "{Down}" ' bas de page
ie.SendKeys "{F8}"      ' Touche F8
IEdoc.SendKeys "{F8}"   ' Touche F8
Application.IEdoc.SendKeys "{F8}", True   ' Touche F8
IEdoc.SendKeys "^S" ' Ctrl + S
ie.SendKeys "^S"    ' Ctrl + S