URL aus Zelle A1 öffnen und schliessen
12.01.2013 07:22:32
nibio
habe im Internet folgende Script gefunden (um IE zu starten und schliessen):
Sub ie_test()
Set objExplorer = CreateObject("InternetExplorer.Application")
With objExplorer
.Navigate ("https://www.google.de/") 'anpassen
.StatusBar = False
.MenuBar = False
.Toolbar = False
.Visible = True
.Resizable = True
.Width = 800
.Height = 600
.Left = 0
.Top = 0
End With
Application.Wait (Now + TimeValue("0:00:10")) '10 Sekunden anzeigen
objExplorer.Quit 'schliessen
Set objExplorer = Nothing
End Sub
Ich würde jetzt gerne anstatt "https://www.google.de/" die URL aus Zelle A1 übernemen,
könnte mir jemand helfen? Dann wollte ich gerne wissen ob möglich wäre weitere Links im selbe Fenster bzw. Registerkarte zu öffnen (habe mehrere Links per VBA starten werde). Ich höffe um Hilfe. Danke im Voraus.
Gruss Nibio