昨日、「秀丸に URL を入力するのではなく、一度アクセスした URL を IE からコピーして動作するようなマクロにしないと…」と言っていたのですが、秀丸のサイトを調べたら、IE から URL をコピーするマクロが紹介されていました。

これを利用して、早速マクロを改造しました。

---------- ここから ----------
// 現在 IE で開いている URL を取得し、
// URL 中の  「〇〇」を「△△」に変換し、IEで開く。

// IE から URL を取得

if( findwindowclass("IEFrame") == 0 ) {
    message "Internet Explorerが起動されていません。";
    endmacro;
}

ddeinitiate "iexplore", "WWW_GetWindowInfo";
$url = dderequest( "0xFFFFFFFF" );
ddeterminate;

if( leftstr($url, 1) == "\"" ) {
    $url = midstr($url, 1, 1024);
    #x = strstr($url, "\"");
    if( #x >= 0 ) {
        $url = leftstr($url, #x);
    }
}

movetolineno 1,lineno+1;
insert $url;
insertreturn;
movetolineno 1,lineno-1;

// 〇〇 を △△ に置き換えて、開く。

replacedown "〇〇", "△△", nocasesense;

if( result == no ) {
  message "△△に変換できません";

} else {
  directtagjump;
  if( result == no ) message "△△版が開きません";
}

endmacro;
---------- ここまで ----------
 

[0回]