Capturing Redirected URL with macro

gmayor · #2 07-11-2015, 09:34 PM

The error appears to relate to the macro trying and failing to open a second instance of IE. Try the following instead

Code:

Dim myIE As Object
Dim redURL As String
    redURL = "http://www.gmayor.com/Word_pages.htm"
    On Error Resume Next
    Set myIE = GetObject(, "InternetExplorer.Application")
    If Err Then
        Set myIE = CreateObject("InternetExplorer.Application")
    End If
    On Error GoTo 0
    myIE.Visible = True
    myIE.Navigate redURL

    Do While myIE.Busy
    Loop

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Capturing numbered headings	jbvalen	Word VBA	5	05-04-2017 05:03 PM
custom icon, undo/redo for macro, permanent macro	Rapier	Excel	0	08-05-2013 06:30 AM
email being redirected to a user not on list of users to be sent to	sjvjoe	Outlook	0	09-26-2012 12:42 PM
Capturing addresses into contacts	lordnacho	Outlook	1	11-01-2010 06:05 PM
time capturing	aligahk06	Excel	0	04-18-2010 11:53 PM