ダブルクォーテーション囲いカンマ区切り形式で保存したい

お願いします。
エクセル2000使用してます。
【質問１】
"名前A","ナマエA","09011111111","[e-mail]"
"名前B","ナマエB","09011111112","[e-mail]"
"名前C","ナマエC","09011111113","[e-mail]"
このように、ワークシートをダブルクォーテーション囲いカンマ区切り形式で保存するにはどうすればよいでしょうか。

【質問２】
上記のデータを読み込むときに電話番号部分の先頭の0が取れてしまうの防ぐために、ファイルの拡張子をtxtにリネームしておいて、エクセルから開くときにウィザードで列のデータ形式を文字列と指定しています。もっと簡単な方法が教えてください。（頻繁にファイルを開くので。。。）

No.2 ベストアンサー 回答者： Hayashi_Trek 回答日時： 2006/11/23 02:34

１．マクロを使わないと出来ません。

　　こんな感じです。
　Open "CsvFileName.csv" for Output as #1
　For Row = 1 to 10
　　For Col = 1 to 10
　　　Select Case Col
　　　　Case 1
　　　　　Print #1 Chr$(&H22) & Cell(Row, Col).Text & Chr$(&H22);
　　　　Case 2
　　　　　Print #1 Chr$(&H22) & Cell(Row, Col).Text & Chr$(&H22);
　　　　Case Else
　　　　　Print #1 Cell(Row, Col).Text;
　　　End Select
　　　If Col = 10 Then
　　　　Print #1, ""
　　　Else
　　　　Print #1, ",";
　　　End If
　　Next Col
　Next Row
　Close #1

２．マクロを使えば自動化できます。
「データ」メニューの「外部データの取り込み」で「テキストファイル」を指定してCSVファイルを選択します。
テキスト取り込みウィザードで列のデータ形式を文字列と指定します。
上記の操作を「マクロの記録」でマクロにしてから
実用になるようにマクロを修正します。

No.3 回答者： takkuni 回答日時： 2006/11/23 10:50

エクセルで保存したcsvファイルをエディターで開いて、コンマをWクォーテーションかタブ区切り形式に置換してテキスト形式で保存してみてはどうでしょうか。

もっと簡単な方法とは言い難いですが・・・。

No.1 回答者： hirorin00 回答日時： 2006/11/22 23:28

はじめまして

１
名前をつけて保存で、ファイルの種類をCSVカンマ区切りで保存してください。

２
>もっと簡単な方法が教えてください。（頻繁にファイルを開くので。。。）
通常のExcel形式（拡張子xls）のままで保存してはいかがでしょうか？
そして必要のあるときだけCSV形式（質問１の形式）で保存するのが一番よい使い方だと思います。

パソコンは使うもので、使われるものではないというのが私の考えです。

この回答への補足

はじめまして、ありがとうございます。
質問１の回答ですが、私のExcel2000では、
　名前A　ナマエA　09011111111　[e-mail]
というデータをcsvカンマ形式で保存すると
　名前A,ナマエA,09011111111,[e-mail]
となってしまいダブルクォーテーションが付きません。

補足日時：2006/11/22 23:38

この回答へのお礼

お礼欄にすみません。補足の追加をこちらに書かせていただきます。
質問２ですが、他のアプリケーションとのやり取りの関係上
Excel形式ではなくダブルクォーテーション囲いカンマ区切り形式で
頻繁に読み書きする必要があるので、
効率化できればと思い質問させてもらいました。

お礼日時：2006/11/23 00:19