小编Lim*_*mak的帖子

使用VBA导入分号分隔的CSV文件

我有一个问题,通过VBA代码用Excel打开.csv文件.我的数据组织如下:

Number;Name;Price1;Price2;City 
1234;"John Smith";"1,75 EUR";"2,15 EUR";"New Mexico" 
3456;"Andy Jahnson";"12,45 EUR";"15,20 EUR";London 
3456;"James Bond";"42,34 EUR";"9,20 EUR";Berlin
Run Code Online (Sandbox Code Playgroud)

当我从Windows Explorator中通过Excel手动打开此文件时,一切看起来都很好,所有值都正确分开.它看起来像这样:

例1

当我尝试通过VBA打开它时,使用

Workbooks.Open fileName:=strPath & "thisFile.csv"
Run Code Online (Sandbox Code Playgroud)

数据用逗号分隔,所以它看起来像这样:

例题

当我使用OpenText函数时,会弹出相同的错误结果

Workbooks.OpenText filename:=strPath & "thisFile.csv", DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=True, Comma:=False, Space:=False, Other:=False
Run Code Online (Sandbox Code Playgroud)

当我尝试使用此线程的解决方案时.有任何想法吗?

csv excel vba excel-vba

4
推荐指数
1
解决办法
9846
查看次数

标签 统计

csv ×1

excel ×1

excel-vba ×1

vba ×1