2024年2月23日 2:49 pm #31607
Participant
大きなお世話かも知れませんが、それっぽいものをマクロで書いてみたので貼り付けておきます。
1:
!function() {
var file = new ActiveXObject("WScript.Shell").SpecialFolders("Desktop") + "\\filelist.txt";
var name = document.FullName;
editor.NewFile();
var p = !1;
if (!shell.FileExists(file)) {
editor.NewFile();
} else {
editor.OpenFile(file, 0, eeOpenDetectUTF8 | eeOpenAllowNewWindow);
p = document.selection.Find(name, eeFindAround);
document.selection.EndOfDocument();
}
if (!p) {
document.writeln(name);
document.Save(file);
}
document.close();
}();
2:
!function() {
var file = new ActiveXObject("WScript.Shell").SpecialFolders("Desktop") + "\\filelist.txt";
if (!shell.FileExists(file)) return;
editor.OpenFile(file, 0, eeOpenDetectUTF8 | eeOpenAllowNewWindow);
document.selection.SelectAll();
var t = document.selection.Text;
document.close();
var files = t.split('\n');
menu = CreatePopupMenu();
for (var i = 0, k; i < files.length; ++i) {
if (!(k = files[i])) continue;
menu.Add(k.substring(k.lastIndexOf('\\') + 1), i + 1);
}
r = menu.Track(0);
if (!r) return;
editor.OpenFile(files[--r], 0, eeOpenDetectUTF8);
// document.selection.insertFromFile(files[--r], 0, eeOpenDetectUTF8);
}();
・良く使うファイルを開き、1でデスクトップのファイルに書き出しておきます(手で入れても構いません)。
・2を使うと、ポップアップメニューでファイル名の一覧が出ます。
・削除と移動はありませんが、デスクトップのテキストファイルなので何とでもなるでしょう…。