- 6 名前：前988 mailto:sage [2008/03/12(水) 23:24:02 ID:rxxZl88MO]
- ●ここから
// 下記でマクロ登録し、キー割り当てでツールバーに割り当てる
// マクロ名：mytest1
// マクロファイル名：mytest1.ppa
winID = Exec("C:\Program Files\Sakura\sakura.exe")
ifb winID < 0 then
MsgBox("エディタが起動してません")
Exit
endif
for i = 1 to 900
// 旧ファイル = "F:\UWSC\mytest\testfile" + (i - 1) + ".txt"
// 新ファイル = "F:\UWSC\mytest\testfile" + i + ".txt"
旧ファイル = "F:\UWSC\mytest\コピー (" + i + ") 〜 testfile1.txt"
新ファイル = "F:\UWSC\mytest\コピー (" + (i + 1) + ") 〜 testfile1.txt"
マクロ作成(i, 旧ファイル, 新ファイル) // マクロを作成
SendStr(0, ""); // クリップボードを空にする
ClkItem(winID, "mytest1", CLK_ACC) // マクロを実行
●つづく
|
 |
