Discussion :

[okrou]

bonjour,

je suis débutant en programmation.
j'exerce dans le domaine agricole et chaque jour je dois renseigner mes données Excel sur un site web. Cela me fait faire un double travail que je souhaiterais simplifier.
Pour cela j'ai commencé à mettre place un programme pour renseigner les zones de texte sur le site web grâce à la formation sur https://qwazerty.developpez.com/tuto...-et-vba-excel/. Mais il y a une zone de texte qui me pose problème.
Le libellé de la zone de texte est "Sous-prefecture". Lorsque je le renseigne avec le code :

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
Sub ListeDeroulante()
'Selectionner une valeur dans une liste déroulante
Dim IE As New InternetExplorer
Dim IEDoc As HTMLDocument
Dim htmlTagCol As IHTMLElementCollection
Dim htmlSelectElem As HTMLSelectElement
 
 
   'Ouvre la page Web
   IE.Navigate "http://www.cadastre.gouv.fr/scpc/accueil.do"
   IE.Visible = True
   WaitIE IE
   Set IEDoc = IE.document
 
   'On va sur l'objet qui contient la liste des indices
   Set htmlSelectElem = IEDoc.all("indiceRepetition")
 
   'On sélectionne l'indice "ter" via sa valeur unique
   htmlSelectElem.Value = "T"
 
'## Autre solution ##
   'On sélectionne l'indice "ter" via l'index
   htmlSelectElem.selectedIndex = 2

proposé par "www.developpez.net" je ne réussis pas car la zone de texte suivante ne se déroule pas. Il faut d'abord utiliser la souris, la dérouler et cliquer pour qu'une action se produise avec le chargement d'un autre lien.
je suis bloqué aidez moi svp.
je vous envoie :

- en annexe 1 l'image de la page concernée
- en annexe 2;3,4 et 5 l'image des code source.
Je pense que cela pourra vous aider pour me sortir de là.
Je reste à votre disposition pour toutes informations complémentaires