[56] ファイルを閉じないで、名前を付けて保存 じゅうじ 2004年01月02日 17:47

// 実行には PPA.DLL が必須です。sakura.exe と同じフォルダに
// PPA.DLL を入れておいてください。
// また、マクロファイルの拡張子は .PPA でなくてはなりません。
// SAVEREOPEN.PPA
// ファイルを閉じないで、名前を付けて保存
var
sa, ss: String;
begin
sa := InputBox('一時保存ファイル名','ファイル名','');
if sa = '' then Exit;
ss := S_ExpandParameter('$F');
S_FileSaveAs(sa,0,0);
S_FileOpen(ss);
end.
// このマクロ何に使うのかと、関心の有る方は[ふぁんくらぶ part4] <217>,<265>をご覧下さい。