(DTPtechNote:1510) [JS_InDesign CS2]スクリプトラベルのリネーム

[せうぞー <anonymous at unknown-host>]

//選択オブジェクト中のラベル名を検索置換する。
//ニッチで書き捨て^^


//エラー処理 
function myerror(mess) { 
  if (arguments.length > 0) { alert(mess); }
  exit();
}

if (app.documents.length == 0) {myerror("ドキュメントが開かれていません")}
var find_str = prompt("検索文字を入力してください", "検索ラベル名");
var find_str_reg = new RegExp(find_str,"g");
var rep_str = prompt("置換文字を入力してください", "置換ラベル名");

var mydocument = app.activeDocument;
if (mydocument.selection.length == 0) {myerror("ページアイテムをひとつ以上選択してください")}
 
for (var i=0; i<mydocument.selection.length; i++){
	var myselection = mydocument.selection[i];
	myselection.label = myselection.label.replace(find_str_reg, rep_str);
}