Search Google from a cell
Do you want to be able to type your search word in a cell, and then run a macro to search Google? This returns the results in a new Internet Explorer window.
1. Put the following code in a module
Sub LaunchSite() Dim newsite As Object Set newsite = CreateObject("InternetExplorer.application") newsite.Visible = True newsite.Navigate _ "http://www.google.com/search?hl=en&ie=UTF-8&q=" _ & ActiveCell.Text End Sub
2. Type your search word or phrase in a cell, hit enter, then click the cell again and run the macro!