CSVファイルの加工について

質問

CSVファイルの加工について
エクセル2000なのですが
,"a","s","d"のように""で区切られたデータ（CSV）をエクセルで開いて編集保存すると
,a,s,d,のデータになってしまいます。
""のついたデータのままにするにはどうすれば良いのでしょうか？

回答No.5

imogasi · ベストアンサー

旧ＤＯＳ－ＢＡＳＩＣ時代からＷｒｉｔｅ＃と言う便利な
ステートメントがあります。ダブルクオーテーション付きで書き出してくれます。
（エクセルのテストデータ）Ａ１：Ｃ５に
a1 b1 c1
a2 b2 c2
a3 b3 c3
a4 b4 c4
a5 b5 c5
（コード）
具体的にはＶＢＥ画面に下記を貼りつけて実行する。
Sub test01()
Open "c:\my documents\aaa9.csv" For Output As #1
d = Range("a1").CurrentRegion.Rows.Count
For i = 1 To d
For j = 1 To 2
Write #1, Cells(i, j);
Next j
Write #1, Cells(i, 3)
Next i
Close #1
End Sub
（結果）
下記ファイルが出来ます。メモ帳で確認したもの。
"a1","b1","c1"
"a2","b2","c2"
"a3","b3","c3"
"a4","b4","c4"
"a5","b5","c5"
（本番用に修正）
（１）For j = 1 To 2－－＞Ｃ列までの表で３－１＝２です。
ｊ列までの表なら１０－１＝９と変えて下さい。
（２）"c:\my documents\aaa9.csv" －－＞ファイルを作るフォルダ名とファイル名は自分で決め、変えてください。
（３）Write #1, Cells(i, 3)－－＞Ｃ列までのとき３、
ｇ列までの時はCells(i,7)に変えること。
ＶＢＥへの貼りつけはＡＬＴキーを押しながらＦ１１キーそしてＡＬＴキーを押しながらＩ（挿入）その後Ｍ（標準モジュール）画面を出してコピペ。

回答No.4

happypoint

読み込みはふつうに読み込んで、
書き出しの時はVBAでテキスト出力すればいいと思いますが。

・・・めんどくさそうですね。

回答No.3

wan-chan

テキストエディタで開けば問題ないと思いますが、
列加工したいのですね。
でしたら、エクセルで加工後に、
エクセルの保存形式（ファイルの種類）を、
ＣＳＶ形式で保存し、
その後はテキストエディタで開けばよいのではないでしょうか？

回答No.2

taknt

エクセルでＣＳＶ形式で 保存すると カンマ区切りにしかならないので、ダメです。
ＣＳＶエディタなど違う手段で編集したらいいでしょう。

回答No.1

noname#4564

> ""のついたデータのままにするにはどうすれば良いのでしょうか？

テキストエディタで開けばよいのでは？

補足

エクセルのような列毎加工ができるテキストエディターはありますでしょうか？

編集加工が目的なのです。