Keskustelu: Ohjelmointikysymykset: VBA: CSV ja Excel

Moikka,

Yritän tuoda CSV tiedostoa VBA:n avulla käsiteltäväksi exceliin.
Alla yrityksiäni

'1
Workbooks.Open "D:\c.csv", , , , xlCSV, , , , """"
'2
Workbooks.Open Filename:="D:\c.csv", Format:=xlCSV, _
Delimiter:="""", ReadOnly:=True
'3
Workbooks.Open "D:\c.csv", , , , xlCSV, , , , ";"
'4
Workbooks.Open Filename:="D:\c.csv", Format:=xlCSV, _
Delimiter:=",", ReadOnly:=True

Puolipiste solujen välissä jää kuitenkin aina kummittelemaan, kun aluekohtaisissa asetuksissa on Suomi muotoilun osalta.

En haluaisi alkaa turhaa käsittelemään tiedostoa excelissä (text to columns, data import, split jne.), kun kerran Workbooks.Open mahdollistaa delimiterin käytön. Mitä tehdä? Kiitos avusta.

Mikke

Moikka mikke3141!

kokeile toimisiko tämä..

kokoPolku = "D:\c.csv"
Workbooks.Open Filename:=kokoPolku, Format:=xlCSV, _
ReadOnly:=True, Delimiter:=";", Local:=True
ActiveSheet.UsedRange.Select
Selection.Columns.AutoFit

Kiitos Nea! Tuo Local:=True teki sen ;o)