ich möchte gerne eine Webseite mit Daten befüllen. Das klappt eigentlich ganz gut mit diesem Code unten.
Mich würde mal interessieren, ob ich die Felder bei geöffneter Seite auch ausfüllen kann? Also das textfeld direkt ansprechen ohne vorher ein neues IE Fenster zu öffnen.
Vielen Dank und Viele Grüße
Sebastian
Mein Code um die Seite zu öffnen und zu befüllen ist
Sub Login()
Dim IEApp As Object, hyper_link As Object
Set IEApp = CreateObject("InternetExplorer.Application")
IEApp.Visible = True
IEApp.Navigate "***://delisonline.dpd.de/delisonline/index.jsp"
IEApp.TheaterMode = False
IEApp.AddressBar = False
IEApp.MenuBar = False
IEApp.StatusBar = False
IEApp.Toolbar = False
IEApp.Resizable = True
' Hier die Fenstergröße definieren
IEApp.Height = 1000
IEApp.Width = 1024
IEApp.Left = 0
IEApp.Top = 0
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Busy = False
Do: Loop Until IEApp.Document.ReadyState = "complete"
With IEApp.Document.All
.Item("txtLogin").Value = "mein@email.de" 'Set username
End With
End Sub