vba csv Datei öffnen als tabelle
20.02.2018 17:04:39
Erik
ich habe folgenden VBA Code:
Sub csv_import()
Dim wb As Workbook
Dim lngZ As Long
Dim strFileName
Dim strFilter As String
ChDrive "Z"
ChDir "\Test\" & "\Downloads\"
strFilter = "csv Dateien(*.csv*), *.csv*"
strFileName = Application.GetOpenFilename(strFilter)
If strFileName = False Then Exit Sub
Set wb = Workbooks.Open(strFileName)
wb.Activate
End Sub
diese wird auch geöffnet aber nicht in Spalten gesplittet sondern alles in einer Spalte mit , getrennt.
Was muß ich am Code ändern damit zwischen jedem "," eine Spalte gesetz wird
Gruß
Erik