Abulkalamには複数のドキュメントがあり、1つのドキュメントから別のドキュメントに連続したページ番号を付けたいと考えています。 1つのドキュメントに追加または削除されたページがある場合、次のドキュメントのページ番号を手動で変更する必要があります。彼はマスタードキュメントとサブドキュメントを使用できることを知っていますが、ワームの缶は彼が開きたくないものです。

Abulkalamは、ページ番号を常に手動で変更する必要性を回避できる方法があるかどうか疑問に思います。

Wordでこれを自動的に行う方法はありません。ドキュメント内のフィールドを使用して回避策を試すことができますが、それは少し複雑になります。例として、3つのドキュメントがあり、それぞれが大きな本の章を表しているとします。 Chap1.docは15ページ、Chap2.docは11ページ、Chap3.docは17ページです。 Chap1.docを開くことから始めて、次の一般的な手順に従います。

。ドキュメントの最後から2番目のページ（この場合は14ページ）のどこかに、連続したセクション区切りを挿入します。

。ドキュメントの最初のセクションのフッター内で、Ctrl + F9を押します。

これにより、PAGEという単語を入力する必要のあるフィールド中括弧のペアが挿入されます。

。 F9キーを押して、作成したフィールドを折りたたみます。これは、現在のページのページ番号を表します。

。 [ヘッダーとフッター]ツールバー（フッターで作業しているため表示されているはずです）で、[次を表示]ボタンをクリックします。これにより、ドキュメントの最後のセクションのフッターに移動します。これは、手順1で挿入したセクション区切りの後です。

。選択されないように、[前と同じ]ツールをクリックします。これにより、前のセクションのフッターが以前に作成したフッターから「リンク解除」されます。

。フッターのPAGEフィールドを削除します。 （心配しないでください。このセクションのフッターを前のセクションのフッターからリンク解除したため、このフィールドは前のページにまだ存在します。）

。 Ctrl + F9を押して、NUMPAGESという単語を入力するフィールド中括弧のペアを挿入します。

。 F9キーを押して、作成したフィールドを折りたたみます。

。作成したフィールドを選択し、Shift + Ctrl + F5を押します。 Wordはブックマークダイアログボックスを表示します。 （図1を参照）

。 bkなどの単純なブックマーク名を入力します。 [追加]をクリックすると、ブックマークが作成されます。

。 [ブックマーク]ダイアログボックスを閉じます。

。ヘッダーとフッターのツールバーを閉じて、ドキュメントを保存します。

ここで、使用するフィールドをもう少し複雑にする必要があることを除いて、Chap2.docドキュメントと同じ一般的な手順に従う必要があります。

ドキュメントファイルがC：\ MyDocs \ Exampleのディレクトリに保存されているとすると、手順2で次の複合フィールドを使用します。

{ ={ INCLUDETEXT "\\MyDocs\\Example\\Chap1.doc" bk \! } + { PAGE } }

これは、INCLUDETEXTフィールドを使用して、Chap1.doc（そのドキュメントの総ページ数）からbkという名前のブックマークにあるものをすべて取得し、現在のページ番号をその値に追加します。したがって、番号付けは、Chap1.docのページ数に関係なく継続されます。

手順7で使用する必要のあるフィールドも同様に複雑です：

{ ={ INCLUDETEXT "\\MyDocs\\Example\\Chap1.doc" bk \! } + { NUMPAGES } }

Chap2.docファイルは以上です。ページ番号は問題なく機能するはずです。 Chap3.docファイルでは、Chap2.docファイルで行ったのと同じ複雑なフィールドを使用して、同じ手順を繰り返します。唯一の違いは、次のようにフィールドでChap2.docを参照することです。

{ ={ INCLUDETEXT "\\MyDocs\\Example\\Chap2.doc" bk \! } + { PAGE } } { ={ INCLUDETEXT "\\MyDocs\\Example\\Chap2.doc" bk \! } + { NUMPAGES } }

ドキュメントのいずれかからページを追加または削除するたびに、フィールドが更新されると、ドキュメント内のページ番号が自動的に更新されることに注意してください。 （フィールドは、手動で更新するか、印刷または印刷プレビューの使用を選択すると更新されます。）

もちろん、このアプローチを使用するときに覚えておく必要のある「落とし穴」がいくつかあります。まず、ファイルのいずれかから連続セクション区切り（ステップ1）を削除すると、本当に混乱します。次に、ドキュメントを別のフォルダに移動する（または別のフォルダを使用する別の人に送信する）と、フィールドはまったく機能しなくなります。

第3に、ドキュメントで複数のセクションを使用する場合、これらのセクションを補正しようとすると、このアプローチはかなり複雑になる可能性があります。

別のアプローチは、マクロを使用してページ番号を処理することです。マクロはすべてのファイルをステップスルーし、開始ページ番号をそれらのファイルに適切なものに設定できます。以下はそのようなマクロの例です：

Sub PageNumberReset()

Dim pgNo As Long     Dim n As Long     Dim pathName As String     Dim fileNames     Dim thisFile As String     Dim aRange As Range

' Specify the path to the document files     pathName = "C:\MyDocs\Example\"

' Create an array holding the document file names, in sequence     fileNames = Array("Chap1.doc", "Chap2.doc", "Chap3.doc")



pgNo = 0     For n = 0 To UBound(fileNames)

thisFile = pathName & fileNames(n)

Application.Documents.Open (thisFile)

ActiveDocument.Sections(1).Headers(1).PageNumbers.StartingNumber = pgNo + 1         Set aRange = ActiveDocument.Range         aRange.Collapse Direction:=wdCollapseEnd         aRange.Select         pgNo = Selection.Information(wdActiveEndAdjustedPageNumber)

Application.Documents(thisFile).Close Savechanges:=wdSaveChanges     Next n End Sub

マクロを使用するには、ドキュメントが保存されているディレクトリを指定し、ドキュメントのファイル名をfileNames配列に入力するだけです。マクロは、最初のドキュメントを1ページから開始し、後続の各ドキュメントを前のドキュメントの最大ページ番号より1つ多いページから開始するように設定します。いずれかのドキュメントのページ数を変更した場合は、マクロを再実行する必要があります。

フィールドやマクロを使用してページ番号を付けたくない場合は、ドキュメント構造を再考し、すべての異なるドキュメントを1つのドキュメントに結合することができます。また、Wordから完全に離れて、複数ファイルのページ番号付けの処理に特化したInDesignなどのデスクトップパブリッシングプログラムでページレイアウトを行うこともできます。

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（1843）は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス（Word 2007）用のこのヒントのバージョンを見つけることができます。以降）ここ：

link複数のドキュメントにわたる自動ページ番号。