bonjour ,
voila je cherche a ouvrir un lien d'une page internet depuis excel
il s'agit d'un lien javascript ce lien est identifie par un id mais pas par un button
et pour le moment je en trouve rien
j'ai essaye avec un Id mais sans succes ,
j'ai changer mon fusils d'epaule et voici un code pour activer le 7 imi lien de la page internet
mais bon la non plus rien ne se passe
pouvez vous m'expliquer pourquoi ?
pour info sur la page je cherche a ouvrir le lien "ses prochaines courses " qui a pour id "partantsTab"
voila je cherche a ouvrir un lien d'une page internet depuis excel
il s'agit d'un lien javascript ce lien est identifie par un id mais pas par un button
et pour le moment je en trouve rien
j'ai essaye avec un Id mais sans succes ,
j'ai changer mon fusils d'epaule et voici un code pour activer le 7 imi lien de la page internet
mais bon la non plus rien ne se passe
pouvez vous m'expliquer pourquoi ?
pour info sur la page je cherche a ouvrir le lien "ses prochaines courses " qui a pour id "partantsTab"
Code:
Sub LienHyperActu()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
Dim Cible As HTMLAnchorElement
Dim Doc As HTMLDocument
IE.navigate "http://www.XXXX.COM/"
IE.Visible = True
Do Until IE.readyState = READYSTATE_COMPLETE
DoEvents
Loop
Set Doc = IE.Document
Set Cible = Doc.Links(25)
Cible.Click
End Sub
Dernière édition: