« 置換マクロ実行後の設定デフォルト化 | トップページ | Esp@cenetの特定ページへのリンク自動作成 »

2008年7月22日 (火)

グーグルのフレーズ検索マクロ

先日のグーグルの右クリックマクロの応用版です。最新のテンプレートはこちら。

通常のグーグル検索のプログラムとの違いは、キーワードの前後に%22があるということです。これが「"」ひとつを意味するみたいです。

グーグルの通常の検索結果のURLとフレーズ検索のURLとの比較して上記のことに気がつきました。

●プログラム

Sub フレーズでグーグル検索()

Dim word As String
Dim URL As String

word = Selection
URL = "http://www.google.co.jp/search?q=%22" & word & "%22&lr="

ActiveDocument.FollowHyperlink address:=URL, NewWindow:=False, AddHistory:=True

End Sub

|

« 置換マクロ実行後の設定デフォルト化 | トップページ | Esp@cenetの特定ページへのリンク自動作成 »

▼右クリックでGoogle!」カテゴリの記事

コメント

コメントを書く



(ウェブ上には掲載しません)




トラックバック

この記事のトラックバックURL:
http://app.cocolog-nifty.com/t/trackback/519619/41943014

この記事へのトラックバック一覧です: グーグルのフレーズ検索マクロ:

« 置換マクロ実行後の設定デフォルト化 | トップページ | Esp@cenetの特定ページへのリンク自動作成 »