ラリーが絶対に4つ以上の新しい空白のドキュメントを作成する必要がある場合があります。彼は、一度に4つの新しい空白のドキュメントを作成する方法があるかどうか疑問に思います(必要な空白のドキュメントの数を入力するとよいでしょう)。

この問題に取り組む方法はいくつかあります。すべて標準テンプレートに基づいて4つの新しいドキュメントを作成するだけの場合、最も簡単な方法はCtrl + Nを4回押すことです。 (実際には、Ctrlキーを押しながらNを4回押すことができます。)結果として、4つの空白のドキュメントが作成され、すぐに使用できるようになります。

ドキュメントが通常のテンプレートとは異なるテンプレートに基づく必要がある場合は、マクロを使用するのが最適です。次のマクロは、作成するドキュメントの数をユーザーに要求し、BusinessReportテンプレートに基づいてドキュメントを作成します。

Sub NewDocuments()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many new documents?")

iNewDocs = CInt(Answer)

For J = 1 to iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next J End Sub

マクロをショートカットキーまたはツールバーのボタンに割り当てて、ドキュメントを作成する準備をすることができます。同じコードで少し異なるアプローチを取ることもできます。目的のテンプレート(BusinessReportテンプレートなど)に基づいて新しいドキュメントを作成し、次のマクロをテンプレートに追加します。

Sub AutoOpen()

Dim Answer As Variant     Dim iNewDocs As Integer     Dim J As Integer

Answer = InputBox("How many more docs?", "Doc Count")

iNewDocs = CInt(Answer)

For J = 1 To iNewDocs         Documents.Add Template:="BusinessReport", NewTemplate:=False, _           DocumentType:=wdNewBlankDocument     Next End Sub

「MultipleDocs.docm」などの名前でドキュメントを保存します。マクロの基本は前のものと同じです。違いは、マクロに付けられた名前です。特別なAutoOpen名を使用するため、MultipleDocsドキュメントがその後開かれるたびに、マクロが自動的に実行され、ユーザーは作成する追加のドキュメントの数を尋ねられます。

注:

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

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

(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(11237)は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice 365のWordに適用されます。このヒントのバージョンは、ここにWordの古いメニューインターフェイス: