| |
参考にさせて頂いてClipBoardへコピーするものに変更してみました。
Excelへは、手動でペーストすることで一覧を作ることに成功しました。
ありがとうございました。
なにかおかしなところがありましたらご指摘ください。
loaddll "tkinfo.dll";
setclipboard "表題\t送信元\t送信日付\n";
#count = dllfunc("SelectedMailCount");
if( #count == 0 ) {
endmacro;
}
#n = dllfunc("LockSelection");
while(1) {
#n = dllfunc("EnumSelection", 1);
if( #n == 0 ) {
break;
}
$subj = dllfuncstr("CurrentHeader", "Subject");
$from = dllfuncstr("CurrentHeader", "From");
$date = dllfuncstr("FormatDate", dllfuncstr("CurrentHeader", "Date"), "o
YYYY/MM/DD hh:mm");
addclipboard $subj + "\t" + $from + "\t" + $date + "\n";
}
#n = dllfunc("UnlockSelection", 1);
|
|