Hallo,

vielen dank, das hat schon mal funktioniert nur habe ich jetzt leider noch ein Problem, das Tool soll eigentlich die Felder füllen dann einen Button drücken und das ganze solange machen bis die schleife durch ist. (benötige ich für die Arbeit damit ich nicht alles per hand machen muss).

Das ganze sieht dann so aus :

x = 0

Do Until x = 3

x = x + 1
DoEvents
WebBrowser2.Navigate "WebPage"
Application.Wait (Now + TimeValue("0:00:5"))
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("lastname")(0).Value = "Müller"
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("plzort[plz]")(0).Value = "12131"
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("plzort[ortsname]")(0).Value = "TestOrt"
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("strasse")(0).Value = "TestStraße"
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("HausNr")(0).Value = "2"
Worksheets("Tabelle1").WebBrowser2.Document.getElementsByName("hausNrZusatz")(0).Value = "*"
On Error Resume Next
Worksheets("Tabelle1").WebBrowser2.Document.Forms(1).Document.Address.submit.Click
Application.Wait (Now + TimeValue("0:00:5"))

Loop

Wenn das ganze nicht in einer Schleife läuft und der Browser auf der gewünschen Seite stet ist alles ok, sobald es aber in der schleife läuft wird der inhalt des Browsers erst akualisiert wenn das makro durch ist und er macht dann nur den letzten durchlauf. die Wait funtkioniert hilft da leider nicht weiter.

Was kann mann dagegen machen? Hab schon mit refresh probiert und auch alles mal in module gepackt und die dann in der schleife nur aufgerufen ist aber das selbe in grün...