Hallo,

der Source-Code ist nur schwer lesbar, wenn dieser komplett in einer Zeile angegeben wird.

Bitte verwende doch das nächste Mal die code-snippet-Funktion im Editor.

Fals ich alle Zeilen richtig interpretiert habe müsste es sich bei Ihrem Code um folgenden handeln:

Public Sub login()
    'make sure you add references to Microsoft Internet Controls and
    'Microsoft HTML Object Library. Code will NOT run otherwise.
    Dim ie As InternetExplorer
    Dim html As HTMLDocument
    Dim IeApp As InternetExplorer
    Dim Link As Object
    Dim ieDoc As Object
    Dim ieAnchors As Object
    Dim Anchor As Object
    Dim ElementCol As Object
    Dim Element As HTMLLinkElement
    Dim objIE As SHDocVw.InternetExplorer 'Microsoft Internet Controls
    Dim htmlDoc As MSHTML.HTMLDocument 'Microsoft HTML Object Library
    Dim htmlInput As MSHTML.HTMLInputElement
    Dim htmlColl As MSHTML.IHTMLElementCollection
    Dim login As Object
    Set objIE = New SHDocVw.InternetExplorer
    With objIE.navigate("MEINE WEBSITE") ' Main page
        .Visible = 1
        Do While .readyState <> 4: DoEvents: Loop
        Application.Wait (Now + TimeValue("0:00:02"))
        'set user name and password
        Set htmlDoc = .document
        Set htmlColl = htmlDoc.getElementsByTagName("INPUT")
        Do While htmlDoc.readyState <> "complete": DoEvents: Loop
        For Each htmlInput In htmlColl
            If htmlInput.Name = "email" Then
                htmlInput.value = "MEINE EMAIL"
            Else
                If htmlInput.Name = "passwort" Then
                    htmlInput.value = "MEIN PASSWORT"
                End If
            End If
        Next htmlInput 'click login
        objIE.document.forms(0).submit
        Do While .readyState <> 4: DoEvents: Loop
        Application.Wait (Now + TimeValue("0:00:02"))
        Set htmlDoc = Nothing
        Set objIE = Nothing
        End With
End Sub

Ohne Verweise funktioniert dieser Code nicht. Um den Fehler nachstellen zu können, werden alle relevante Verweise im VBA Editor benötigt.

VG, BigBen