複数のWord 2010文書を結合する

Word 2010は、基本的な編集ツールやグラフ作成スタイルに加え、文書を自由にカスタマイズできるオプションも備えており、文句なしに最高のWordエディタです。Word 2010には、デフォルトで隠されている機能を追加するためのオプションが用意されています。例えば、数行のコードを挿入するだけで、専用のサードパーティ製アプリを使わずにWord文書を結合できます。この記事では、数行のコードを挿入するだけで、同じフォルダにあるすべての文書の内容を結合し、新しいフォルダに表示する方法を説明します。

まず、すべてのファイルを同じフォルダに保存し、Wordのバージョン(DocまたはDocx)が同じであることを確認してください。下のスクリーンショットに示すように、結合する2つの文書を開いています。

複数のWord 2010文書を結合する

次に、任意の Word 文書を開き、マクロ有効文書として保存します。そのためには、[ファイル] メニューに移動して [名前を付けて保存] をクリックします。

複数のWord 2010文書を結合する

ダイアログが表示されるので、「ファイルの種類」から「Word マクロ有効テンプレート」をクリックし、「保存」をクリックします。

複数のWord 2010文書を結合する

VBエディタを使用するため、まずWordウィンドウに「開発」タブが表示されるようにする必要があります。 「開発」タブが見つからない場合は「ファイル」メニューの「オプション」をクリックし、左側のペインで「リボンのユーザー設定」をクリックします。右側のペインで「開発」チェックボックスをオンにします。「OK」をクリックすると、リボンに「開発」タブが表示されます。

複数のWord 2010文書を結合する

次に、[開発]タブに移動して[Visual Basic] をクリックします。

複数のWord 2010文書を結合する

VBエディタダイアログが表示されます。左側のサイドバーから「ThisDocument」をダブルクリックしてVB編集ウィンドウを開きます。右側にコードウィンドウが表示されますので、そこに以下のコードを入力してください。

注:これらのコード行にある文書が保存されているフォルダのパスとWord文書のバージョンを忘れずに変更してください。作業を容易にするため、コードの前にもこの注意事項を追加しています。

サブ MergeDocs()

暗くする範囲

MainDoc をドキュメントとして暗黙的に記述する

Dim strFile As String

Const strFolder = “C:\Users\Usman Javaid\Desktop\Word documents\” ||| (ドキュメントが保存されているパスを変更します)

MainDoc = Documents.Add を設定します

strFile = Dir$(strFolder & “*.docx”) ||| (Word 97-03バージョンの場合はファイル拡張子を.docに変更してください)

strFile = “” まで実行する

rng = MainDoc.Range を設定します。

rng.Collapse wdCollapseEnd

rng.InsertFile strFolder & strFile

strFile = Dir$()

ループ

終了サブ

複数のWord 2010文書を結合する

Ctrl+Sを押して、新しく追加したマクロを保存し、VBエディタを閉じます。「開発」タブに移動し、「マクロ」をクリックします。

複数のWord 2010文書を結合する

マクロダイアログからMergeDocsマクロを選択し、実行をクリックします。

複数のWord 2010文書を結合する

パスとバージョンを正しく指定すると、すべてのドキュメントが結合され、新しいドキュメントで開きます。

複数のWord 2010文書を結合する

また、以前にレビューした「Word 2010 で編集した最後の行に戻る」および「Word 2010 で差し込み印刷を使用する」ガイドもご覧ください

[ gaebler経由]

Leave a Comment

Excel 2010: 標準電話番号と社会保障番号 (SSN) を追加する

Excel 2010: 標準電話番号と社会保障番号 (SSN) を追加する

Excel 2010では、特定の種類のデータをセルに追加できます。Excelスプレッドシートに電話番号を挿入することは、これまで常に問題となっていました。

Excel 2010: SUMPRODUCT関数の使用

Excel 2010: SUMPRODUCT関数の使用

ExcelのSUMPRODUCT関数は最もよく使われる関数の一つです。その汎用性から、様々な用途に使用できます。この関数は配列を次のように処理できます。

Excel 2010: XML形式の操作

Excel 2010: XML形式の操作

ExcelはXMLファイルを扱うという本質的な性質を持っていますが、たとえそれが広く受け入れられている標準に準拠していなくても、XMLファイルには以下のようなデータが含まれている可能性があります。

Outlook 2010のメール、連絡先、メモ、タスク、予定をエクスポートする

Outlook 2010のメール、連絡先、メモ、タスク、予定をエクスポートする

Outlook 2010には、デフォルトで包括的なエクスポートオプションがありますが、それだけでは十分ではなく、電子メール、連絡先、メモなどを複数のファイルにエクスポートするのは簡単ではありません。

Outlook 2010が遅い?メールヘッダーのみダウンロードする方法

Outlook 2010が遅い?メールヘッダーのみダウンロードする方法

Outlook 2010をオフラインで実行することは、メール以外のタスクを実行したい場合に便利です。しかし、100通ものメールがあり、処理に非常に時間がかかる場合はどうでしょうか?

Outlook 2010でメールの既定のフォント設定とテーマを変更する

Outlook 2010でメールの既定のフォント設定とテーマを変更する

Outlook 2010でフォント設定を変更したり、画像の背景を追加したりするのは簡単です。メール作成画面のフォント設定から変更できるからです。

Visio 2010でドキュメントと図形を保護する

Visio 2010でドキュメントと図形を保護する

Visio 2010は、他のVisio製品のような高度な保護をサポートしていません。Visioで複雑な図を作成する場合、図全体または一部を保護する必要がある場合があります。

Outlook 2010: 指定した送信者からのメールアラート通知

Outlook 2010: 指定した送信者からのメールアラート通知

デスクトップメールアラート通知はOutlook 2010の素晴らしい機能であることは間違いありませんが、新しいメールが届くたびに通知が来ないこともあります。

Excel 2010: アドレス関数

Excel 2010: アドレス関数

Excel 2010には絶対参照と相対参照の2種類の参照方法があり、数式を扱うときにこれらの参照方法は非常に重要です。

Excel 2010: PROPER関数

Excel 2010: PROPER関数

スプレッドシートのセルに入力する際、急いで入力しようとすると、セル内の単語の大文字と小文字が不規則になってしまうことがあります。