Click dans un menu HTML

Version imprimable

Bonjour,

je vais sur une page HTML qui contient un menu sur la droite. Quand je clique sur un élément du menu, ça affiche une liste d'éléments cliquables qui sont du style : <span>myElement1</span>.
Dans mon code ci-dessous, quand je fais le 1er clic pour ouvrir un élément du menu, ça marche, une sous liste apparaît. Mais le second clic dans l'élément de la sous-liste ne marche pas. Pourtant le .innerText me renvoie bien le nom du lien sur lequel je clique :
Code:

1 2 3 4 5 6 msgbox oIE.Document.getElementsByClassName("theme")(0).innerText oIE.Document.getElementsByClassName("mysister sister-etraining")(0).Click wscript.sleep 2000 msgbox oIE.Document.getElementsByClassName("sub-cat sub-cat-of-0")(2).innerText 'renvoie le nom du lien(span) oIE.Document.getElementsByClassName("sub-cat sub-cat-of-0")(2).Click
Pourriez-vous m'indiquer comment faire pour cliquer sur le 2ème lien, svp?

Merci d'avance pour vos réponses.
Arsène

Code:

1 2 3 4 msgbox oIE.Document.getElementsByClassName("theme")(0).innerText oIE.Document.getElementsByClassName("mysister sister-etraining")(0).Click wscript.sleep 2000 msgbox oIE.Document.getElementsByClassName("myDiv")(2).innerText 'renvoie le nom du lien(span)
J'ai trouvé la solution pour le cas où y'a plusieurs div imbriquées du style <div class myDivX, avec des listes <li class myListX

Pour cliquer sur le lien, on prend les références de la liste et de la div qui suit :

Code:

oIE.Document.getElementsByClassName("mylist1")(3).getElementsByClassName("myDiv2")(0).click

C'est pas très clair, il faut tâtonner. J'aimerai savoir comment faire pour cliquer sur un lien dans un span :

Code:

<a target="_blank" href="https://www.google.com">myGoog</a>

J'ai essayé :

Code:

Set elem = document.getElementById("a").getElementsByTagName("myGoog")

ça marche pas.

J'ai trouvé une solution :

Code:

1
2
3
   set el = oIE.document.all.tags("a")(numero du tag)
   msgbox el.innerText
   el.click

Pour cliquer sur un tag, il faut donc auparavant chercher le numéro du tag dans la page.

Code:

1
2
3
4
5
6
7
8
   Set box = oIE.document.getElementById("myID")' On sélectionne l'élément qui contient le tag
   Set el = box.getElementsbyTagName("a") 
   For i = 0 To el.length -1 
     If el(i).innerText = "myGoog" Then 
       msgbox "ok"
       el(i).Click 
     End If 
   Next