Hi Experts,
Please help me with this code
Sub FillInternetForm()
Dim objIE As Object
Dim theForm As HTMLFormElement
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate "http://www.oanda.com/currency/converter/";
objIE.Visible = True
Do While objIE.busy
While objIE.busy
DoEvents
Wend
Loop
objIE.Document.getElementById("quote_currency_input").Value =
"Gambian Dalasi"
objIE.Document.getElementById("flipper").Click
End Sub
Thanks
Airen
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
