Discussion :

[translator1993]

Bonjour,

Est-il possible de remplir une boîte input générée par un script .js via une macro VBA excel ?

Voici le code HTML de ma boîte input :

Code html :

Sélectionner tout - Visualiser dans une fenêtre à part

<input class="form-valid-ng" type="text" placeholder="search" ng-model="ng-model"> </input>

J'avais pensé à changer grâce à getElementsbyTagName(ng-model).value = "mon nombre". Mais ça ne marche pas.

[patricktoulon]

bonjour
c'est normal ng model n'est pas un tag mais un attribut
tu pourrais faire comme suis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
set mesimputs=ie.document.getelementsbytagname("INPUT")
for i = 0 to mesinputs.length-1
if mesinputs(i).getattribute("ng-model")<>"" or  mesinputs(i).getattribute("ng-model")<>null then set myinput=mesinputs(i)
next 
'suite
myinput.value="toto"

tu pourrais chercher par la classe aussi "getelementsbyclassname("form-valid-ng")(0)" 0 c'est le premier de la classe

[translator1993]

Merci de ta réponse.

J'ai réussi avec ton code que j'ai remanié car je me suis rendu compte qu'il n'y avait qu'un seul élément qui correspondait au IF.

Voici le code remanié :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Set mesimputs = objIE.document.getElementsByTagName("input")
    Set mesimputs = mesimputs(0)
 
mesimputs.Value = "toto"

Toto s'inscrit bien dans mon inputbox mais normalement, quand on clique dessus et qu'on écrit quelque chose, on filtre les documents qui correspond au critère de recherche. Or, ça ne marche pas ici alors que mon toto est bien écrit. Est-ce normal ?

[patricktoulon]

pour t'aider il faudrait que j'ai ce lien si cela n'est pas confidentiel ou si ce n'est pas un intranet

[translator1993]

C'est un intranet et les données de ce site sont confidentielles.

J'imagine que tu ne seras pas m'aider alors ?

Je peux essayer de te donner le code source de la page HTML mais elle est pratiquement générée en javascript.

[translator1993]

J'ai finalement trouvé une autre technique pour faire ce que je voulais.