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!