Vba 将字符串值导出到.txt文件

Vba 将字符串值导出到.txt文件,vba,string,printing,export,txt,Vba,String,Printing,Export,Txt,我从VBA开始,为了我的工作,我必须分析excel表格并将我的简历导出到.txt文件 我能够创建保存文件的名称(“NomFichier”)-是的,它是法语;)-以及通过选择保存文件的放置(“放置”)来选择我的路径 在分析过程中,我将值存储到字符串(“Hor(30)”) 我现在正在寻找使用文件的路径和名称将字符串的值导出到.txt文件的方法…有人能帮我吗 以下是文件名和查找路径processus的代码: 'Nom du tableau deviens nom du fichier .txt

我从VBA开始,为了我的工作,我必须分析excel表格并将我的简历导出到.txt文件

我能够创建保存文件的名称(“NomFichier”)-是的,它是法语;)-以及通过选择保存文件的放置(“放置”)来选择我的路径

在分析过程中,我将值存储到字符串(“Hor(30)”)

我现在正在寻找使用文件的路径和名称将字符串的值导出到.txt文件的方法…有人能帮我吗

以下是文件名和查找路径processus的代码:

   'Nom du tableau deviens nom du fichier .txt
   'Name of the file to be save

    Dim NomFichier As String
    NomFichier = Tableau_X & "_" & Titre
    
    'Emplacement du fichier txt à enregistrer
    'Location of the file to be save

    Dim Emplacement As String
    Dim diaFolder As FileDialog

    Set diaFolder = Application.FileDialog(msoFileDialogFolderPicker)
    diaFolder.AllowMultiSelect = False
    diaFolder.Show
    Emplacement = diaFolder.SelectedItems(1)
    Set diaFolder = Nothing

“…”

要写入文本文件,您需要文件路径(您有)和下一个可用的文件号,这很容易获取。然后“打开”文件号进行修改

Dim fileNum As Integer

fileNum = FreeFile

Open Emplacement For Output As fileNum
Print #fileNum, "write your information here"
Close fileNum
您可以根据需要使用任意多个
Print
语句,或者将数组与循环一起使用,或者使用多种其他方式来添加数据。
#fileNum
引用您正在使用
Print
语句修改的文件,下一位可以是变量或硬编码

此代码创建一个新文件,但您可以使用
Input
从文件中读取,并使用
Append
添加到现有文件中。您可以在此处阅读有关与文件交互方式的更多信息: