Eine Frage:Ist es nicht möglich aus Zelle bestimmten Text
in internet Seite mit Formular kopieren,also ausfüllen.
Geht sowas?
Grüße
Rolf
Sub WebseiteAusfüllen()
Dim appIE As Object
Set appIE = CreateObject("InternetExplorer.application")
appIE.Visible = True
appIE.Navigate "https://www.google.de/"
While Not appIE.ReadyState = 4 'Warte auf Webseite
DoEvents
Wend
appIE.Document.all.q.Value = "Herber Excel Forum"
appIE.Document.Forms(0).submit
Set appIE = Nothing
End Sub
Gruß Tino
Sub WebseiteAusfüllen()
Dim appIE As Object
Set appIE = CreateObject("InternetExplorer.application")
appIE.Visible = True
appIE.Navigate "http://www.boersevz.de/"
While Not appIE.ReadyState = 4 'Warte auf Webseite
DoEvents
Wend
appIE.Document.all.FormBenutzer.Value = "Mein Username"
appIE.Document.all.FormPasswort.Value = "Mein Passwort"
appIE.Document.Forms(0).submit
Set appIE = Nothing
End Sub
Gruß Tino