|
こんにちわ。猫です。
現在次の形で外部からCSVファイルを取り込んでいるのですが、
セルのAからACまでのデータを取り込んでいると、
AB以降のデータがすべてABに,区切りでつながってしまいます。
例
| AB | AC | | AB | AC |
----------- これが次のようになります→ -----------
| 1 | 2 | | 1,2| |
ソースは次のように書いています。
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;test.text", Destination:=Range("A4"))
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
'.TextFilePlatform = xlWindows
.TextFilePlatform = _
IIf(Val(Application.Version) >= 10, 932, xlWindows)
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = True
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 2, 2, 2) '←ここの意味が判らない
.Refresh BackgroundQuery:=False
End With
どなたか原因が判る方教えてください。
|
|