DoCmd.TransferText, méthode (Access)

La méthode TransferText exécute l’action TransferText dans Visual Basic.

Syntaxe

expression.TransferText (TransferType, SpecificationName, TableName, FileName, HasFieldNames, HTMLTableName, CodePage)

expressionune variable représentant un objet DoCmd.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
TransferType	Facultatif	AcTextTransferType	Type de transfert que vous voulez opérer. Vous pouvez importer, exporter ou lier des données dans des fichiers texte ou HTML délimités ou de longueur fixe HTML. La valeur par défaut est acImportDelim. Seuls les types de transferts acImportDelim, acImportFixed, acExportDelim, acExportFixed ou acExportMerge sont pris en charge dans un projet Microsoft Access (.adp).
SpecificationName	Facultatif	Variant	Expression chaîne qui correspond au nom du format d'importation ou d'exportation que vous avez créé et enregistré dans la base de données active. Dans le cas d'un fichier texte de longueur fixe, vous devez spécifier un argument ou utiliser un fichier schema.ini, qui doit être stocké dans le même dossier que le fichier texte importé, attaché ou exporté. Vous pouvez créer un fichier schéma à l'aide de l'Assistant d'importation/exportation de texte. Dans le cas des fichiers textes délimités et des fichiers de données de publipostage Microsoft Word, vous pouvez laisser cet argument vide afin de sélectionner les caractéristiques d'importation/exportation par défaut.
TableName	Facultatif	Variant	Expression chaîne qui correspond au nom de la table Access dans laquelle vous voulez importer des données, de laquelle vous voulez exporter les données ou à laquelle vous voulez attacher des données. Il peut s'agir également d'une requête Access dont vous voulez exporter les résultats dans une feuille de calcul.
FileName	Facultatif	Variant	Expression chaîne qui représente le nom et le chemin du fichier texte dont vous voulez importer les données, dans lequel vous voulez exporter des données ou auquel vous voulez attacher des données.
HasFieldNames	Facultatif	Variant	Utilisez True (1) pour utiliser les noms de champs de la première ligne du fichier texte lors d'une importation, exportation ou liaison. Utilisez False (0) pour traiter la première ligne du fichier texte comme des données normales. Si vous laissez cet argument vierge, la valeur par défaut (False) est choisie. Cet argument est ignoré pour les fichiers de données de publipostage Microsoft Word, dans lesquels la première ligne doit toujours contenir les noms des champs.
HTMLTableName	Facultatif	Variant	Expression de chaîne correspondant au nom de la table ou de la liste du fichier HTML à importer ou à associer. L’argument est ignoré sauf si l’argument TransferType reçoit la valeur acImportHTML ou acLinkHTML. Si vous ne renseignez pas cet argument, la première table ou liste du fichier HTML est importée ou associée. Le nom de la table ou liste du fichier HTML est déterminé selon le texte spécifié par la balise CAPTION, s’il y a une balise CAPTION. S’il n’y a aucune balise CAPTION, le nom est déterminé selon le texte spécifié par la balise TITLE. Si plusieurs tables ou listes portent le même nom, Access les différencie en ajoutant un nombre à la fin du nom de chaque table ou liste (par exemple, Employés1 et Employés2).
Identificateurs de CodePage	Facultatif	Variant	Valeur Long indiquant le jeu de caractères de la page de codes.

Remarques

Utilisez la méthode TransferText pour importer ou exporter du texte entre la base de données ou le projet (.adp) Access en cours et un fichier texte. Vous pouvez également lier les données d'un fichier texte à la base de données Access en cours. Avec un fichier texte lié, vous pouvez consulter les données de texte avec Access, tout en autorisant un accès complet aux données de votre programme de traitement de texte. Vous pouvez également effectuer les opérations d'importation, d'exportation et de liaison de table ou de liste dans un fichier HTML (*.html).

Vous pouvez exporter les données figurant dans des requêtes de sélection Access dans des fichiers textes. Access exporte le jeu de résultats de la requête comme s'il s'agissait d'une table.

Exemple

Cet exemple exporte les données de la table External Report (État externe) de Access dans le fichier texte délimité April.doc en utilisant le format Sortie standard.

DoCmd.TransferText acExportDelim, "Standard Output", _ 
    "External Report", "C:\Txtfiles\April.doc"

Le code suivant montre comment créer un document Microsoft Word et effectuer un publipostage avec les données stockées dans la table Clients.

Public Sub DoMailMerge(strFileSavePath As String)

    ' Create new Word App, add a document and set it visible
    Dim wdApp As New Word.Application
    wdApp.Documents.Add
    wdApp.Visible = True

    ' Open the data set from this database
    wdApp.ActiveDocument.MailMerge.OpenDataSource _
        Name:=Application.CurrentProject.FullName, _
        OpenExclusive:=False, _
        LinkToSource:=True, _
        Connection:="TABLE Customers", _
        SQLStatement:="SELECT Customers.* FROM Customers;"
              
    ' Add fields to the mail merge document
    Dim oSel As Object
    Set oSel = wdApp.Selection
    With wdApp.ActiveDocument.MailMerge.Fields
    
        oSel.TypeText vbNewLine & vbNewLine
        .Add oSel.range, "First_Name"
        oSel.TypeText " "
        .Add oSel.range, "Last_Name"
        oSel.TypeText vbNewLine
        .Add oSel.range, "Company"
        oSel.TypeText vbNewLine
        .Add oSel.range, "Address"
        oSel.TypeText vbNewLine
        .Add oSel.range, "City"
        oSel.TypeText ", "
        .Add oSel.range, "State"
        oSel.TypeText " "
        .Add oSel.range, "Zip"
        oSel.TypeText vbNewLine
        oSel.TypeParagraph
        oSel.TypeText "Dear "
        .Add oSel.range, "First_Name"
        oSel.TypeText ","
        oSel.TypeText vbNewLine
        oSel.TypeParagraph
        oSel.TypeText "We have created this mail just for you..."
        oSel.TypeText vbNewLine
        oSel.TypeText vbNewLine
        oSel.TypeText "Sincerely," & vbNewLine & "John Q. Public"
        oSel.TypeText vbFormFeed
        
    End With
    
    ' Execute the mail merge and save the document
    wdApp.ActiveDocument.MailMerge.Execute
    wdApp.ActiveDocument.SaveAs strFileSavePath
        
    ' Close everything and Cleanup Variables
    Set oSel = Nothing
    wdApp.ActiveDocument.Close False
    Set wdApp = Nothing

End Sub

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.