Starting a google search....

[jokobe]

I use this code to start a google search from a word document:

ActiveDocument.FollowHyperlink ("http://www.google.de/search?hl=de&q= " &
MySearch & " &btnG=Google-Suche&meta=")

It works fine, but I want to have quotationmarks to have an exact word for
word search.

Any helpful hints?

jokobe

 

[StevenM]

To: Jokobe,

You can add quotation marks like so:

.... & Chr(34) & MySearch & Chr(34) & etc.

Where Chr(34) = a quotation mark

Steven Craig Miller

 

[jokobe]

Thanks for your answert, but

ActiveDocument.FollowHyperlink ("http://www.google.de/search?hl=de&q= " &
Chr(34) & MySearch & Chr(34) & " &btnG=Google-Suche&meta=")

is not working, it is not displaying any quotationmarks... have tried that
before

jokobe

 

[jokobe]

I have found the solution, it works like this:

MySearch = Selection.Text
strSearch = Replace(MySearch, " ", "+")
ActiveDocument.FollowHyperlink ("http://www.google.de/search?hl=de&q= " &
Chr(34) & Chr(34) & Chr(34) & strSearch & Chr(34) & Chr(34) & Chr(34) & "
&btnG=Google-Suche&meta=")

So it is 3 quotationsmarks and the spaces have to be replaced...
(there might be a smarter solution, but this works)

Anyhow, thanks for your help

jokobe

 

[StevenM]

To: jokobe,

Also, this works:

Sub TestFollowHyperlink()
Dim sSearch As String
sSearch = "Search This"
sSearch = Replace(sSearch, " ", "+")
sSearch = "%22" & sSearch & "%22"
ActiveDocument.FollowHyperlink ("http://www.google.com/search?hl=en&q="
& sSearch & "&btnG=Search")
End Sub

Google used "%22" for quotations marks.

 

[Karl E. Peterson]

Thanks for your answert, but

ActiveDocument.FollowHyperlink ("http://www.google.de/search?hl=de&q= " &
Chr(34) & MySearch & Chr(34) & " &btnG=Google-Suche&meta=")

is not working, it is not displaying any quotationmarks... have tried that
before

Have you ever *used* google with a quoted string, then looked at the resultant URL?

http://www.google.com/search?q="two+words"

Try things! It's the only true path to discovery.

 

[jokobe]

thanks Steven....

your solution is working better

jokobe