Selection.InsertFile, méthode (Word)
Insère tout ou partie du fichier spécifié.
Syntaxe
expression. InsertFile
( _FileName_
, _Range_
, _ConfirmConversions_
, _Link_
, _Attachment_
)
expression Obligatoire. Variable qui représente un objet Selection.
Paramètres
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
FileName | Obligatoire | Chaîne | Chemin d'accès et nom du fichier à insérer. Si vous ne spécifiez pas de chemin d'accès, Word considère que le fichier se trouve dans le dossier actif. |
Range | Facultatif | Variant | Si le fichier spécifié est un document Word, ce paramètre fait référence à un signet. S'il s'agit d'un autre type de fichier (par exemple, une feuille de calcul Microsoft Excel), ce paramètre désigne une plage nommée ou une plage de cellules (par exemple, R1C1:R3C4). |
ConfirmConversions | Facultatif | Variant | True pour que Word invite l'utilisateur à confirmer la conversion lors de l'insertion de fichiers dans des formats autres que le format Document Word. |
Link | Facultatif | Variant | True pour insérer le fichier en utilisant un champ INCLUDETEXT. |
Attachment | Facultatif | Variant | True pour insérer le fichier en tant que pièce jointe à un e-mail. |
Exemple
Cet exemple montre comment utiliser un champ INSERTFILE pour insérer le fichier « Test.doc » au niveau du point d'insertion.
Selection.Collapse Direction:=wdCollapseEnd
Selection.InsertFile FileName:="C:\TEST.DOC", Link:=True
Cet exemple montre comment créer un document, puis insérer dans le nouveau document le contenu de chacun des fichiers texte situés dans le dossier « 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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour