(発言者削除)No.24934
nari さん 05/11/06 12:59
 


[ ]
RE:24934 メールタイトル一覧の印刷No.24936
三月 さん 05/11/06 18:50
 
> 秀丸メールでメールタイトル一覧の表示を印刷すること
>ってできますか?
> できないとしても、メールの本文ファイルから次の項目
>だけを抽出してTXTファイルにするにはどうすれば良いで
>しょうか。
>
>・タイトル
>・送信者
>・受信日時
>

メール一覧で出力したい範囲のメールを選択して
こんな感じのマクロを実行して出来たリストをExcel等で整形して
印刷するって手もあるでしょう。
------------------------------------
loaddll "TKInfo.dll";

#me = hidemaruhandle(0);

// 出力用に新規メールを開く
#nm = dllfunc("NewMail");
#nm = hidemaruhandle(0);

setactivehidemaru( #me );

// 選択範囲を確認
#count = dllfunc("SelectedMailCount");
if( #count == 0 ) {
    // 選択されてなければ終わり
    endmacro;
}
#n = dllfunc("LockSelection");
// 選択メールのループ
while(1) {
    #n = dllfunc("EnumSelection", 1);
    if( #n == 0 ) {
        // 選択メールの終了→抜ける
        break;
    }
    //・タイトル
    $sbj = dllfuncstr("CurrentHeader", "Subject", 0 );
    //・受信日時
    $rcv = dllfuncstr("GetMailTransmitDate");
    //・送信者
    $frm = dllfuncstr("CurrentHeader", "From", 0 );
    // 連結する
    $str = $sbj + "," + $frm + "," + $rcv;

    // 新規メールに切り替える
    setactivehidemaru( #nm );
    // 終端に移動
    gofileend;
    // タイトル+送信者+受信日時を挿入
    insert $str;
    // 折り返しを解除
    #n = dllfunc("SwitchDontOrikaeshi");
    //insertreturn;
    // 秀丸メール本体に移動
    setactivehidemaru( #me );
}
#n = dllfunc("UnlockSelection", 1);

[ ]
RE:24936 メールタイトル一覧の印刷No.24937
nari さん 05/11/06 21:05
 
>こんな感じのマクロを実行して出来たリストをExcel等で整形して
>印刷するって手もあるでしょう。
 
 うわ!とてもスマートな手法ですねー。
 マクロに慣れているとこういうのがチャチャとできて
良いなー。

 ありがとうございます、とても助かりました。

[ ]