Selection.InsertFile メソッド (Word)

指定したファイルのすべてまたは一部を挿入します。

構文

expression. InsertFile( _FileName_ , _Range_ , _ConfirmConversions_ , _Link_ , _Attachment_ )

expression 必須です。 Selection オブジェクトを表す変数を指定します。

パラメーター

名前 必須 / オプション データ型 説明
FileName 必須 String 挿入するファイルのパスとファイル名を指定します。 パスを指定しないと、現在のフォルダー内のファイルが指定されます。
Range 省略可能 バリアント型 (Variant) 引数 Name に Word 文書を指定した場合は、ブックマーク名を指定します。 Excel など、他のアプリケーションのファイルを指定した場合は、範囲名やセル範囲 (R1C1:R3C4 など) を指定します。
ConfirmConversions 省略可能 バリアント型 (Variant) True を Word 文書形式以外の形式のファイルを挿入するときに、変換を確認するダイアログ ボックスが表示されます。
Link 省略可能 バリアント型 (Variant) 場合は true。 INCLUDETEXT フィールドを使用してファイルを挿入します。
Attachment 省略可能 バリアント型 True を指定 すると、メール メッセージに添付ファイルとしてファイルが挿入されます。

次の使用例は、IncludeText フィールドを使用して、カーソル位置に TEST.DOC ファイルを挿入します。

Selection.Collapse Direction:=wdCollapseEnd 
Selection.InsertFile FileName:="C:\TEST.DOC", Link:=True

次の使用例は、新しい文書を作成し、C:\TMP フォルダーの各テキスト ファイルの内容を挿入します。

Documents.Add 
ChDir "C:\TMP" 
myName = Dir("*.TXT") 
While myName <> "" 
 With Selection 
 .InsertFile FileName:=myName, ConfirmConversions:=False 
 .InsertParagraphAfter 
 .InsertBreak Type:=wdSectionBreakNextPage 
 .Collapse Direction:=wdCollapseEnd 
 End With 
 myName = Dir() 
Wend

関連項目

Selection オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。