Bonjour,
J’ai le souci pour automatiser le click sur le bouton au site internet sécurisé.
Je colle bien mon identifiant dans la boite de connexion, je interpelle deuxième chargement de page. Mon objet LastIe n’est pas vide. Je vois nom de bouton dans un outil F12 de IE.
Je récupère le bouton :
Puis
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Set maPageHtml = LastIE.document Set ElemButExport = maPageHtml.getElementsByName("s236206")
MsgBox ElemButExport affiche qu’il y a un objet dans une variable ElemButExport.
Et lors je fais :
ElemButExport.Click Il y un message d’erreur438 : Propriété ou méthode non gérée par cet objet.
Le bout de code:
Quelqu'un à une idée ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32 For Each obj In objShell.Windows 'On regarde si l'appli est de type Document internet If TypeName(obj.document) = "HTMLDocument" Then 'On regarde si c'est bien l'instance qui a charge ma page If Left(obj.document.URL, 34) = "http://nom_site" Then 'c'est ma page 'If obj.document.URL = "http://nom_site" Then 'On pointe cette instance via la variable IE Set LastIE = obj 'On quite la boucle Exit For End If End If Next 'Ensuite on utilise IE Set maPageHtml = LastIE.document Set ElemButExport = maPageHtml.getElementsByName("s236206") 'MsgBox ElemButExport ElemButExport.Click Application.Wait Time + TimeSerial(0, 0, 10) 'On libère la variable LastIE Set LastIE = Nothing
Partager