Openen ";" gescheiden bestand

[mcs51mc]

Hallo,
Waarom werkt volgende code niet om een ";" gescheiden CSV bestand in te lezen?
Delimiter:= 4 is toch ";" dus waarom veegt Excel er zijn broek aan ? ?

Set oMyWB = Application.Workbooks.Open(Filename:="C:\Data_11.csv", Delimiter:=4)

Ik heb het probleem omzeild via "TextToColumns" maar zou toch graag weten waarom die "Delimiter:=4" zijn werk niet doet!

Alvast bedankt voor een reactie!
VrGr

PS: Ik heb de extentie van de file moeten aanpassen van CSV naar TXT daar csv's niet up te loaden zijn

 

[snb]

Controleer eerst de Windowsinstellingen:

Sub tst()
    MsgBox Application.International(xlListSeparator)
end sub

Als de puntkomma het resultaat is gebruik dan:

Sub M_snb()
    Workbooks.Open "naam van het bestand ", Local:=True
end sub

 

[mcs51mc]

Dag snb,

Bedankt voor deze input!
In Windows staat inderdaad het ";" als lijstscheidingsteken, dat maakt het nog vreemder dat het niet werkt ?!?
Met

Local:=True

wordt de file inderdaad juist geopend.

Maar nu zie je mij al komen
of niet ?

Ik heb in Windows het lijstscheidingsteken gewijzigd naar "," en dan lukken geen van beide code meer.
De

Local:=True

is 100% logisch omdat Windows anders staat.
Maar waarom blijft

Delimiter:=4

niet werken alhoewel de help duidelijk zegt:

You can specify one of the following values in the Format parameter to determine the delimiter character for the file.
Value -- Delimiter
1 -- Tabs
2 -- Commas
3 -- Spaces
4 -- Semicolons
5 -- Nothing
6 -- Custom character (see the Delimiter argument)

 

[snb]

Als in windows de puntkomma als lijstscheidingsteken staat moet dit voldoende zijn:

workbooks.open "G:\voorbeeld.csv"

 

[mcs51mc]

Indeed maar wat als het zo niet is ? ?
En wat in de help staat ook niet echt werkt, tenzij ik het vekeerd interpreteer

 

[mcs51mc]

Niemand ?