VBでcsvファイルを取り込むときに・・・
困っています。ビジュアルベーシック初心者です。
次のようなcsvデータがあります。
「あいうえお,,かきく,,1あ2い3う,,12.3,,45.6,,78.9
あいうえお,,かきく,,1あ2い3う,,12.3,,45.6,,78.9
あいうえお,,かきく,,1あ2い3う,,12.3,,45.6,,78.9」
※あいう等はテキスト、123等は数値(小数)
これをエクセルに表示するため、
With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & (ファイル名), Destination:=Range("B3"))
.TextFileCommaDelimiter =True
.Refresh BackgroundQuery =False
End With
とプログラムしました。
ところが、エクセルをみると全てのデータの間に1マスづつ余計なセル(空白)が入ります。
空白が入らない取り込み方はあるでしょうか?
なお、一度別な場所に取り込み必要なセルだけ転記するというのは避けたいです。
アドバイスを宜しくお願いします。