Hi Friends
I have some to share with you which help you to work with
internet.
Sub google()
Dim ie
Set ie = CreateObject("internetexplorer.application")
ie.navigate Sheets(1).Cells(1, 1).Value
ie.Visible = True
ie.Document.All.Item("q").Value = Sheets(1).Cells(2, 1).Value
ie.Document.All.Item("f").submit
End Sub
Regards
Vishal Parihar
I hope you like it
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us in TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
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
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!
We reach over 6,500 subscribers worldwide and receive many nice notes about the
learning and support from the group.Let friends and co-workers know they can
subscribe to group at http://groups.google.com/group/excel-macros/subscribe
