How to modify my VBS search tool to be site(s) specific?

[rhelm]

Greetings,

I have found the below google search tool to be a big help. It simply runs a google search on whatever cells that I've highlighted with a single button press.

I'd like to modify to only return specific sites in the results via these two additions: site:Bloomberg.com AND site:manta.com

However, I'm not sure how to fold it into the argument. Could somebody point me in the right direction?

Sub GoSearch()
Dim rng As Range
Dim strURL As String
Dim strCriteria As String
Dim strArgument As String


strURL = "http://www.google.com/search?q="
strArgument = "&lc=www&btnG=Google+Search"


For Each rng In Selection
If Len(rng) > 0 Then
strCriteria = strCriteria & " " & rng
End If
Next


strCriteria = Mid(strCriteria, 2)


ActiveWorkbook.FollowHyperlink ADDRESS:=strURL _
& strCriteria & strArgument


End Sub