XL 2016 VBA POUR MANIPULER PAGE WEB

duplaly

XLDnaute Occasionnel
Bonjour
J'essaye de cliquer sur un bouton dans la page web, mais sans succès!
Voici le code pour me connecter sur le site de la compagnie et il faut que je sois sur leur réseau!


Voici le code du fameux bouton!
<a id="BUTTON_GROUP_ITEM_1_btn4_acButton" ct="B" st="" href="javascript:void(0);" ti="0" tabindex="0" class="urBtnStd" ocl="sapbi_page.sendCommandArray([['GUID','5',0],['NOUILOCK','X',0],['BI_COMMAND_TYPE','ABSTRACT',0]],event);" onkeydown="ur_Button_keypress(event);" onclick="ur_Button_click(event);" style="min-width: !important;text-align:center;overflow:visible;">Exporter vers Excel</a>


End Sub


Sub MyLogin()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.application")
IE.Visible = True
IE.navigate ("Ce lien n'existe plus")
Do
If IE.readyState = 4 Then
Exit Do
Else
DoEvents
End If
Loop
On Error Resume Next

IE.document.Forms(0).all("j_username").Value = "XXXXX"
IE.document.Forms(0).all("j_password").Value = "XXXXX"
IE.document.Forms(0).submit


End Sub
 

D.D.

XLDnaute Impliqué
Hello,

Ah, ah, je vois du BW SAP ici, non ?

Bizarre quand même: Tu parles d'un bouton "Exporter vers Excel" mais tu montres du code pour te connecter à BW.
Le bouton dont tu parles est après ? Tu pourrais envoyer un screenshot ?
 

duplaly

XLDnaute Occasionnel
Bonjour
Tel que demandé, le bouton «exporter vers Excel» est illustré!

1564502531261.png
 

Discussions similaires

Statistiques des forums

Discussions
312 115
Messages
2 085 453
Membres
102 890
dernier inscrit
selkis