+ Reply to Thread
Results 1 to 2 of 2

macro to auto open internet explorer

Hybrid View

  1. #1
    Registered User
    Join Date
    07-17-2011
    Location
    Manila, Philippines
    MS-Off Ver
    Excel 2007
    Posts
    16

    macro to auto open internet explorer

    hi guys im sorry if my title is a little vague.
    im trying to create a macro that will auto open an intranet site according to the filters that i have set. so far i have this code. (i changed the ip address for security purposes)
    Dim ie As InternetExplorer
    
    j = 2
    Do While Range("a" & j) <> ""
        Set ie = New InternetExplorer
        
    ie.Visible = True
    ie.Navigate "http://0.0.0.0/servlet/GSISAlias?check_arr=arrival&check_dep=departure&vessel_code= &service_code=" & Range("E" & j) & "&city_code=" & Range("A" & j) & "&city_name=&from_date=" & Range("B" & j) & "&to_date=" & Range("C" & j) & "&vessel_type=&direction=" & Range("E" & j)
    Do Until ie.ReadyState = READYSTATE_COMPLETE
    Loop
    
    j = j + 1
    Loop
    the code above is working perfectly fine but i want to add something. usually what i would do once that page opens is i would click on a checkbox and then click on a link.
    and it would open this page(below link)
    http://0.0.0.0/servlet/SendHTMLPage?Attachment=GSISAlias%3Fvessel_type%3D%26to_date%3D2011-11-26%26city_code%3DESALR%26city_name%3D%26vessel_code%3D%26check_arr%3Darrival%26check_dep%3Ddeparture%26from_date%3D2011-08-19%26direction%3D%26service_code%3D&maxPage=22&text_only=true&jsp_type=3&baseURL=http%3A%2F%2F0.0.0.0%2Fservlet%2F&multiPage=1
    Im trying to figure out to open that link according to the filters i have set on the first code. I know it is a bit confusing but any inputs would be appreciated. thank you very much!

  2. #2
    Registered User
    Join Date
    07-17-2011
    Location
    Manila, Philippines
    MS-Off Ver
    Excel 2007
    Posts
    16

    Re: macro to auto open internet explorer

    im also think of just automating the selecting of check box and clicking of the link..
    like

    Dim check as Object
    Set check = ie.Document.getElementsbyTagName("checkbox").value = True
    //im not sure of this code but i hope you get the idea
    and then same for auto clicking the link.
    anyone?

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1