Hallo, liebe Helfer! Ich habe gerade nach ewig langer VBA-Abstinenz ein makro geschrieben. Es sollen aus einer Excel-Tabelle mit Username (email) und Passwort in ein Anmeldeformular einer Website eingefügt werden und dann sollte automatisch der Login-Button gedrückt werden. Das Einfügen etc. ist mir gelungen, jedoch funktioniert das mit dem Login-Button nicht automatisch. Der Button ist eine input class und hat keine ID. Und mit getelementsbyname funktionierts auch nicht. Kann da vielleicht jemand helfen?

Hier mal der Code:

Sub Essen()

Dim email As String
Dim pw As String
Dim zeile As String

'On Error GoTo Fehler

zeile = ActiveCell.Row
email = "Tabelle1!B" + zeile
pw = "Tabelle1!C" + zeile

Dim IEApp As Object
  Set IEApp = CreateObject("InternetExplorer.Application")
  IEApp.Top = 10
  IEApp.Left = 10
  IEApp.Width = 1250
  IEApp.Height = 850
  'IEApp.FullScreen = True
  IEApp.Visible = True
 
  IEApp.Navigate "http://meetandeat.takeaway.io/users/sign_in"
 
  Do: Loop Until IEApp.Busy = False
  Do: Loop Until IEApp.Busy = False
    With IEApp.document
    Do: Loop Until .ReadyState = "complete"
    .getelementbyId("user_email").Value = Range(email).Value
    .getelementbyId("user_password").Value = Range(pw).Value

  End With
 
' Fehler:   MsgBox "Immer abmelden, dann schließen!"

End Sub

Und hier der HTML-Code:

<small>Mein Mittagsessen</small>
</h1>
</div>
<form accept-charset="UTF-8" action="/users/sign_in" class="form-horizontal" id="new_user" method="post"><div style="margin:0;padding:0;display:inline"><input name="utf8" type="hidden" value="&#x2713;" /><input name="authenticity_token" type="hidden" value="LNSmGVcaKwHlByf4/uWuPAszUttI4L6I8Vuot6OMX30=" /></div><div class='control-group'>
<div class='controls'>
<h3>Anmelden</h3>
</div>
</div>
<div class='control-group'>
<label class="control-label" for="user_email">Email</label>
<div class='controls'>
<input autofocus="autofocus" id="user_email" name="user[email]" placeholder="Email" type="email" value="" />
</div>
</div>
<div class='control-group'>
<label class="control-label" for="user_Kennwort">Kennwort</label>
<div class='controls'>
<input id="user_password" name="user[password]" placeholder="Kennwort" type="password" />
</div>
</div>
<div class='control-group'>
<div class='controls'>
<label class="checkbox" for="user_remember_me"><input name="user[remember_me]" type="hidden" value="0" /><input id="user_remember_me" name="user[remember_me]" type="checkbox" value="1" />
Angemeldet bleiben
</label><input class="btn btn-primary" name="commit" type="submit" value="Anmelden" />
</div>