>>87
できます。

参考までにIEだとこんなカンジでしょうか。

Set ie=CreateObject("InternetExplorer.Application")
Set ie.Document.body.ondblclick=sample