Hi,
I am trying to automate the tracking of my shipping containers into an excel spreadsheet.
I currently use the following link to do this. https://www.shipmentlink.com/servlet...rgoTracking.do
The problem is that I cannot figure out how to get VBA to enter my shipping tracking number and return the information I require.
I can get VBA to open the website but I need to enter a unique code and submit the form.
Thanks in advance
Shet
It is difficult to say if it is possible with out looking at the page since it requires a real tracking number. Is the tracking number a secure number and do you need to login to access the info? If the answer is yes, you are left on own since noone but account holder can see the view page.
Give his a go:
Sub TheShetland() Dim IE As Object Set IE = CreateObject("InternetExplorer.application") IE.Visible = True IE.Navigate ("https://www.shipmentlink.com/servlet/TDB1_CargoTracking.do") 'wait for page to load Do While (IE.busy Or IE.readyState <> 4) Application.Wait (Now + TimeSerial(0, 0, 2)) Loop IE.document.forms("frmCargo").Item(16).Value = "012345678900" 'change this hard coded value to a variable, or cell reference, or whatever the source is for the search data. IE.document.forms("frmCargo").Item(17).Click End Sub
Please help by:
Marking threads as closed once your issue is resolved. How? The Thread Tools at the top
Any reputation (*) points appreciated. Not just by me, but by all those helping, so if you found someone's input useful, please take a second to click the * at the bottom left to let them know
There are 10 kinds of people in this world... those who understand binary, and those who don't.
You Sir are a master. Thank you. It worked perfectly.
Wonderful, I'm glad it worked out. Could I ask you to mark the thread as solved when you have a moment? Thanks in advance
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks