サクラエディタ > マクロ > Googleで検索 - 選択範囲をGoogleで検索

 1 | ' 選択文字列/カーソル位置単語をGoogleで検索
 2 | Dim keyword
 3 | 
 4 | keyword = GetSelectedString(0)
 5 | If keyword = "" Then
 6 |     keyword = GetSelectedString(0)
 7 | End If
 8 | 
 9 | Dim sh
10 | Set sh = CreateObject("WScript.Shell")
11 | Call sh.Run("http://www.google.co.jp/search?ie=Shift_JIS&hl=ja&lr=&num=50&q=" & keyword)