|
Hallo,
ich möchte aus Access heraus per VBA den passenden IE/IE-Tab mit der richtigen URL raussuchen und darauf Eingaben machen
Das Aufrufen und Ansprechen des richtigen IE ist kein Problem; wenn die URL aber zB auf dem ersten Tab des IE liegt und der Focus auf einem anderen Tab des IE liegt, schaffe ich es nicht diesen ersten IE-Tab sichtbar in den Vordergrund zu holen...
der Nutzer muss sehen was auf dem IE-Tab passiert und sollte in dem aufpoppenden IE nicht erst den richtigen Tab öffnen müssen
habe im WWW leider keine Lösung gefunden...
...
Set objShell = CreateObject("Shell.Application")
For Each objItem In objShell.Windows
If InStr(LCase(objItem.FullName), "iexplore.exe") > 0 Then
'IE gefunden, dann auf die URL prüfen
If objItem.LocationURL = "http://meineSeite.de" Then
'richtigen IE gefunden
Set IEApp = objItem
ShowWindow IEApp.hwnd, 1
SetForegroundWindow IEApp.hwnd
SetActiveWindow IEApp.hwnd 'sollte bei "ShowWindow ...hwnd, 1" bereits aktiviert sein
IEApp.Visible = True
'XXX hier liegt das Problem: richtiger IE poppt auf, ABER ich möchte nicht nur den IE sehen der den richtigen Tab enthält sondern auch den richtigen Tab sichtbar im Vordergrund haben
Else
'IE hat andere IE-Adresse
End If
End If
Next objItem
If IEApp Is Nothing Then
Set IEApp = CreateObject("InternetExplorer.Application")
Do Until IEApp.Busy = False
Call Sleep(100)
Loop
IEApp.Navigate "http://meineSeite.de"
Do Until IEApp.Busy = False
Call Sleep(100)
Loop
Call Sleep(3000)
End If
IEApp.Width = 1050
IEApp.Height = 1150
IEApp.Left = 0
IEApp.Top = 0
IEApp.Visible = True
...und jetzt weiter mit ieapp.document, iedoc.value = "mein EingabeText", Button.click etc |