Do you want to be able to type your search word in a cell, and then run a macro to search Newsgroups? 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://groups.google.com/groups?hl=en&lr=&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!
