Use this instead. You don't have to add the library in this case.
Sub FillInternetForm()
Dim objIE As Object
Dim theForm As Object
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate "http://www.oanda.com/currency/converter/";
objIE.Visible = True
Do While objIE.busy: Loop
objIE.Document.getElementById("quote_currency_input").Value = "Gambian
Dalasi"
objIE.Document.getElementById("flipper").Click
Do While objIE.busy: Loop
End Sub
Regards,
Sam Mathai Chacko (GL)
On Thu, Oct 27, 2011 at 8:28 PM, NOORAIN ANSARI <noorain.ans...@gmail.com>wrote:
> Dear Airen,
>
> Please add Microsoft HTML Liberary then run your code.
>
> Press Alt+F11
> Tools-References-Check Microsoft HTML Liberary then press F5
>
> Coding is correct
>
> On Thu, Oct 27, 2011 at 8:14 PM, airen <airen1...@gmail.com> wrote:
>
>> 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
>>
>
>
>
> --
> Thanks & regards,
> Noorain Ansari
> *http://excelmacroworld.blogspot.com/*<http://excelmacroworld.blogspot.com/>
> *http://noorain-ansari.blogspot.com/*<http://noorain-ansari.blogspot.com/>
>
> --
>
> ----------------------------------------------------------------------------------
> 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
>
--
Sam Mathai Chacko
--
----------------------------------------------------------------------------------
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
