■実用編
■番号　005

■タイトル
名刺の名前や肩書きなど必要項目だけを入れ替え自動生成、自動保存する

■リード文
　Excel等で入力したデータを流用して対応するテキストを入れ替えていくことができます。レイヤーに名前を付けておき、そのレイヤーに存在するテキストブロックを入れ替えることで名刺が自動的に作成できます。作成後に自動的に保存するようにすると、ほぼ全自動で名刺を作成できます。

■プログラム説明（ソースコード説明）
　まずExcel等でデータを入力しタブ区切りテキストで保存します。１行目で保存したタブ区切りテキストのパスを指定し、２行目で保存先のパスを指定します。split()を使って読み込まれたデータベースファイルを行ごと、列ごと区切ります。入れ替えるデータとレイヤー名をswapData()関数に渡します。レイヤー名に存在する項目はlayers[レイヤー名].pageItemsで取得できます。文字以外が含まれている場合にはtextArtItemsを使えばテキストのみ処理可能になります。文字を入れ替えるにはfor命令を使いレイヤー内に含まれているテキストブロックの数だけ繰り返します。textRange()でテキストオブジェクトを作成しcontentsプロパティに入れ替える文字を入れます。処理したいレイヤーの数、項目数だけ行います。処理が終わったらEPSファイル保存処理を行います。

■ソースコード
fileName = "/Macintosh HD/ai_data/meishi2.txt";
saveName = "/ai_result/meishi_";
fileRef = new File (fileName);
flag = fileRef.open ("r","","");
CRCODE = String.fromCharCode(13);	//　改行コード
TABCODE = String.fromCharCode(9);	//　タブコード
if (flag)
{
	tmp = fileRef.read();
	text = tmp.split(CRCODE);
	for (j=0; j<text.length; j++)
	{
		swpText = text[j].split(TABCODE);
		swapData("名前",swpText[0]);	//　先頭は名前
		swapData("肩書き",swpText[1]);	//　肩書きは２番目
		swapData("携帯",swpText[2]);	//　携帯は３番目
		swapData("メール",swpText[3]);	//　メールは４番目

		//　EPS保存処理
		epsOpt = new EPSSaveOptions();
		epsOpt.compatibility = Compatibility.ILLUSTRATOR10;
		saveFile = new File(saveName+j+".eps");
		activeDocument.saveAs(saveFile, epsOpt);
	}
}
fileRef.close();

//入れ替え処理
function swapData(layerName, sText)
{
		var sel = activeDocument.layers[layerName].pageItems;
		var count,txtRange;
		for (count=0; count<sel.length; count++)
		{
			txtRange = sel[count].textRange(); 
			txtRange.contents = sText;
		}
}


■使い方
１：名刺の元データを作成します。入れ替える名前や役職ごとにレイヤーを作成します。レイヤー名は「名前」「肩書き」「携帯」「メール」にします。
２：ファイルメニューからスクリプトを実行します。
３：レイヤーのテキスト内容が指定されたファイルの対応データに入れ替わります。
４：入れ替わると自動的にファイルが保存されます。


■ポイント
　名刺に利用するデータは以下のように左から順番に名前、役職、電話番号、メールアドレスになります。テキストはShift JIS形式で改行コードは13 (Mac)にしておきます。

相田　のりお	代表取締役	090-1234-5678	aida@abc.com
飯田　やすお	部長	090-1234-5679	iida@bbc.com
高橋　五郎	係長	090-1234-5680	gorou@usonet.co.jp
松村　佳枝	　	090-1234-5681	matsumura@usagi.net
中田　百合	　	090-1234-5682	yuri@dirty.jp