Macro/投稿/52

  0
  1
  2
  3
  4
  5
  6
  7
  8

'otw_ext.vbs ----------------------------------------
'拡張子検索
sWord = Editor.ExpandParameter("$C")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = true
 
naviURL = "http://www.55555.to/ext/go/ext.cgi" _
    & "?text=" & sWord
objIE.Navigate( naviURL )