Wordの脚注・文末脚注をInDesignに反映する

DTP作業者にとっての難易度　★☆☆☆☆（1）

【2019.6.15】『Word文書の体裁（ルビ・文字飾り・脚注など）をInDesignに反映する』（http://mottainaidtp.seesaa.net/article/467138279.html）にてルビや文字飾り、文字色、蛍光ペンなどの処理も含む作業手順を整理しました。併せてご覧ください。

※2018.6.26・2018.7.31／スクリプトを追加（CC2018などで文末脚注マーカー後にスペースが発生することに対応）。

※2019.6.11／スクリプト内の〓を∇に変更。

※2021.9.3／スクリプトを更新（脚注番号、文末脚注番号が連続する場合に正しく処理されるよう修正）。

※2021.9.27／スクリプトを更新（文末脚注内の強制改行が正しく処理されるよう修正）。

※2023.9.6／スクリプトを更新（CC2019以降では表組み内に脚注番号を挿入できるので、それに対応）

※2025.3.12／マクロの解説テキスト（points）を更新（脚注・文末脚注ともマクロ6行目の書き換えを追加／処理数上限を1000に変更）

Word原稿に脚注や文末脚注が使用されている時、InDesignに正しく反映できないケースが時々あります。特に表組み内に存在する脚注番号や文末脚注番号については、そのままではInDesignに反映することができません。今回はそれらをきちんと処理することができないか試してみました。

作業について

Word／表の直後に改行記号を挿入する

Wordのテキスト原稿では表の直後に改行記号が入力されていないケースがよくあります。このままInDesignにテキストデータを読み込むと、表組み直後の段落が直前の段落とつながった状態になってしまいます。今回のテーマである脚注、文末脚注とは直接関係ないかもしれませんが、改行記号を挿入しておいたほうが安心です。
この作業については［みんなのワードマクロ］の「【コード】表の直後に改行記号を挿入する」（http://www.wordvbalab.com/code/2018/）を使わせていただいています。

Word／脚注、文末脚注の内容を括弧書きに変換する

脚注および文末脚注の内容を確実にInDesignに読み込める状態にするため、それぞれ記号の付いた括弧書きの状態にします。
この作業については［You Look Too Cool］の「Wordで脚注を括弧書きに変換するマクロ」（http://stabucky.com/wp/archives/6677）を少し編集した上で使わせていただいています（編集内容につきましてはサンプルデータ内の「points_......txt」をご覧ください）。

InDesign／括弧書き部分を脚注、文末脚注に変換する

InDesignで対象ストーリーを選択（文字を選択 or カーソルを点滅）してからスクリプトを実行します。プルダウンメニューで作業内容を選択しますが、InDesign CC2017（12.x）以前には文末脚注機能がありませんので「A：〔◆◆◇◇〕も〔★★☆☆〕も脚注にする」しか実行できません。ご了承ください（スクリプトで切り分けることもできますが省略してしまいました）。

※動画でもご覧いただいたように、もともと表組み内に存在した脚注や文末脚注の位置には、スクリプト実行後【◆◆3◇◇】などのようにすみつきパーレンの状態で番号のみが表示された状態になります（数字はスクリプト実行前と同じもの）。この部分にはテキストで脚注番号を設けることになると思いますが、今回のスクリプトではそこまでの処理はしませんでした。

いつものことですが、いずれも自分の作業に使うことを想定して実験的に作ってみたものです。お試しになる際はバックアップをとり、十分にテストしていただけますようお願いします。

2025.3.12版サンプルデータはこちら《footNote_endNote_2025_0312a.zip》です。

JeditXの全角/半角変換設定をExcel+AppleScriptで管理する

DTP作業者にとっての難易度　★☆☆☆☆（1）

JeditXには「半角→全角」「全角→半角」「全角/半角文字の統一」という、とても便利な機能があります。ただ、設定が「半角→全角」「全角→半角」で各1種類ずつしか保存できないことについては以前から残念に思っていました。

何か方法がないかと思っていたところ「半角→全角」「全角→半角」のダイアログに表示される「cnvFlag」という値（文字列）が設定内容を示していることが分かりました。この値を使ってAppleScriptを実行すれば全角/半角変換を一気に処理できることも確認できました（下図参照）。この方法であれば複数の変換設定をファイルとして保存しておくことも可能です。



ただ、スクリプトに書かれたcnvFlagの値から変換設定内容を推測することは困難です（間違ったファイルを使うと事故にもつながります）。これを解決するために今回はExcelを使って設定をおこない、cnvFlagの値を得る方法を考えました。



Excelのドロップダウンリストで各項目のオン／オフを設定すると、右側の黄色い欄にcnvFlagの値が表示されます。また、下部の緑色の欄にはAppleScriptの内容が生成されます。この5行をコピーしてスクリプトエディタにペーストするだけで、簡単に実行ファイルを作ることができます。

また、反対にcnvFlagの値を入力すると設定内容が表示されるExcelファイルも用意しました。確認のために使用することを想定しています。

手作業でコツコツ入力したExcelファイルなので、どこかに不備があることも考えられます。必ずバックアップをとり、十分にテストしてからお試しいただくようお願いします。

サンプルデータはこちら《cnvFlag_0620e.zip》です。

Wordの蛍光ペン（マーカ）部分をInDesignの文字スタイルに反映する

DTP作業者にとっての難易度　★★☆☆☆（2）

※2016.5.9にサンプルデータを改良（蛍光ペン部分→文字色のマクロに加え、蛍光ペン部分→タグ付加のマクロを追加）。2016.5.24、2016.6.8にサンプルデータを更新しました。

★蛍光ペンに加え、文字飾り、文字色などにもタグをつけるマクロも作成しました（別ページ）。今後は『Wordの文字飾り・文字色・蛍光ペンをInDesignの文字スタイルに反映する』をご覧ください。

仕事の中で、複数の色の蛍光ペン（マーカ）で指示が施されているWord原稿に時々出会います（この色の部分はゴシック、この色の部分は下線にしてほしい……など）。しかしWordの検索機能では蛍光ペンの存在は把握できますが、その色の違いまでを見分けることはできません。
そこで今回はマクロ（VBA）を使って蛍光ペン部分をそれぞれ異なる色の文字に変更することを考えました。


この処理ができてしまえば、あとは以前「Wordの色文字部分をInDesignの文字スタイルに反映する」でご紹介した方法を使ってInDesign上で文字スタイルを適用できるわけです。


Webをいろいろと検索したところ「ぐりにたんく」というブログにベースとして使えそうなVBAサンプルを見つけました。書き換えについてはものかのさん、すびさんにご教示いただきました。では、どのようなものができたか動画をご覧ください。

マクロでは色名を「wdPink」などと表記しています。これらの色名についてはhttp://e-yan.net/?p=713が分かりやすく整理されています。

（2016.5.9追記）蛍光ペン部分にタグを付加する

Wordのdocxファイルやrtfファイルではなくプレーンテキストを使用する方のために、蛍光ペン部分を《ピンク→》○○○《←ピンク》などのタグで挟むマクロも追加作成しました（ものかのさんに全面的にご指導いただきました。ありがとうございました）。以下、動画をご覧ください。

マクロについてはまったく知識がなく書き方が適切でない部分もあるかもしれません。改善案などありましたら、ぜひご教示ください。

◆蛍光ペンを色別に処理する方法は「ぐりにたんく」さんのVBAを使わせていただきました。
　http://d.hatena.ne.jp/gurinita/20090117/1232164205
◆Wordにおける色名についてはこちらを拝見しました。
　http://e-yan.net/?p=713
◆VBAの書き換えについてはものかのさん、すびさんに教えていただきました。
皆さま、ありがとうございました。

※2016.6.8にサンプルデータを更新しました（コメントが存在するとマクロが止まるためコメントを削除する手順を加えました）。

★このページのサンプルデータは削除しました。今後は『Wordの文字飾り・文字色・蛍光ペンをInDesignの文字スタイルに反映する』をご覧ください。