Vba 将.csv转换为具有特定长度的.txt

Vba 将.csv转换为具有特定长度的.txt,vba,csv,text-files,Vba,Csv,Text Files,我有一个.csv文件。我想把它转换成从A行到B行的.txt文件(A,B在开头声明)。.txt文件应具有空格“”,而不是原始分号。此外,在新的.txt文件中,从原始.csv文件复制的每一行的结尾都应该用分号表示(txt文件将用作Matlab的输入矩阵) 你能帮我一下吗 提前谢谢 问候 Vaclav您好,如果您锁定VBA代码,也许这可以帮助您 Sub csv2mat() Dim Filename As String Dim Filenamenew As String Dim str As Strin

我有一个.csv文件。我想把它转换成从A行到B行的.txt文件(A,B在开头声明)。.txt文件应具有空格“”,而不是原始分号。此外,在新的.txt文件中,从原始.csv文件复制的每一行的结尾都应该用分号表示(txt文件将用作Matlab的输入矩阵)

你能帮我一下吗

提前谢谢

问候


Vaclav

您好,如果您锁定VBA代码,也许这可以帮助您

Sub csv2mat()
Dim Filename As String
Dim Filenamenew As String
Dim str As String
'Change the path to the Files and and create a txt file
Filename = "C:\Documents and Settings\user\Desktop\as.csv"
Filenamenew = "C:\Documents and Settings\user\Desktop\new.txt"
Open Filenamenew For Output As #2
Open Filename For Input As #1
Do While Not EOF(1)
    Line Input #1, str
    str = Replace(str, ";", """") & ";"
    Print #2, str
Loop
Close #1
Close #2
End Sub

如果Matlab要使用它,为什么不将其保存为.mat文件而不是.txt文件?我正在使用Excel2010进行VBA宏,但我对此非常缺乏经验。。。我曾尝试搜索stackoverflow听到的一些威胁,但我并不真正熟悉这些程序。我认为使用一个.txt文件会更方便,因为我将在我的matlab中使用几个这样的“矩阵”(然后我可以复制并粘贴单独的txt文件的内容作为输入矩阵),谢谢Moosli。我想这正是我想要的。干杯