Auto IE login -> danach diverse hyperlinks öffnen
03.02.2015 00:09:40
Harald
Hi Zusammen,
ich habe folgendes vor:
1) VBA loggt sich in meinem Aktiendepot ein,
2) suche Link mit Depotnummer startend 0084474* (Achtung gekürzt zwecks Datensicherheit) und anklicken
3) und suche anschliessend auf der darauffolgenden Seite den Hyperlink "CSV exportieren" und klicke diese ebenfalls an.
Folgender Code der Nummer 1 abdeckt habe ich bereits.
Option Explicit
Public IEApp, IEDocument As Object
Public Sub Einloggen()
Dim IEApp As Object
'Neues Browser-Objekt erzeugen
Set IEApp = CreateObject("InternetExplorer.Application")
'Browser sichtbar machen
IEApp.Visible = True
' EZT-Online-Dienst aufrufen
IEApp.navigate "https://www.dab-bank.de/#login" ' Hier deine URL nachpflegen!
' Seitenaufbau abwarten
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.document.readyState = "complete"
SendKeys "{ENTER}^a{DELETE}0084474*{TAB}^a{DELETE}DEPOTPASSWORT{TAB}{TAB}{ENTER}", True
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.document.readyState = "complete"
End Sub
Problem ist, ich kriege den Code nicht hin, dass er mir die Depotnummer öffnet, komme einfach nicht weiter dass ich den Linknamen zugewiesen bekomme, falls notwending folgend auch der Quellcode der Webseite im Bereich der Depotnummer, bitte um Hilfestellung