マクロ

エクセルでGoogleサーチするマクロ

Private Sub CommandButton3_Click()
    Dim Gword As String
    Gword = Replace(Replace(ActiveCell.Text, " ", "+"), "　", "+")
    CreateObject("WScript.Shell").Run "www.google.co.jp/search?q=" & Gword
End Sub

上記のコードはワークシート内の文字をGoogleサーチするためのものです。

このコードのカギはWScriptというコードです。
Google AIによる説明では下記のように記載されております。

WScript.Shell は、Windows Script Host (WSH) で使用できるオブジェクトの一つで、Windowsのシェル機能を操作するためのオブジェクトです。WshShellオブジェクトとも呼ばれます。このオブジェクトを利用することで、スクリプトから様々なシステム操作を実行できます。

-マクロ