下記のようにEXCELマクロにてEXCELファイルをCSVファイルに保存しようとしています。
NewBook.SaveAs
Filename:="test.csv",
FileFormat:=xlCSV,
CreateBackup:=False
このとき、セル値にダブルクォーテーションが含まれていると、出力CSVファイルの値がダブルクォーテーションで囲まれてしまいます。
●ダブルクォーテーションが含まれていない場合
セル値→A列:ABC
B列:DEF
CSVファイル→ABC,DEF
●ダブルクォーテーションが含まれている場合
セル値→A列:A"C
B列:DEF
CSVファイル→"A"C",DEF
後者の場合もダブルクォーテーションで囲まれないようにするにはどうすればよいでしょうか。
No.1
- 回答日時:
これじゃだめでしょうね。
Public Sub TEST()
Open "C:\Test.csv" For Output As #1
Print #1, Range("A1"); ",";
Print #1, Range("B1")
Close #1
End Sub
No.2ベストアンサー
- 回答日時:
こんにちは。
Sub sample()
Dim s As String
Dim r As Long, c As Long, i As Long, n As Long
With Range("A1").CurrentRegion
r = .Rows.Count
c = .Columns.Count
End With
n = FreeFile
Open "D:\test.csv" For Output As n
For i = 1 To r
s = Join(WorksheetFunction.Index(Cells(i, 1).Resize(, c).Value, 0), ",")
Print #n, s
Next i
Close #n
End Sub
…な感じでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- その他(プログラミング・Web制作) pythonでクラスで複数のメソッドを利用する方法 2 2022/04/15 04:17
- Visual Basic(VBA) VBAで特定の場所にあるCSVファイル(複数)から特定場所を抜き出してExcelに転記したいです。 11 2023/05/23 16:29
- Excel(エクセル) Excelについて。 Excelからcsv変換したいのですが、 やり方はファイル→名前をつけて保存→ 7 2022/07/27 01:10
- Visual Basic(VBA) エクセルVBA 4 2022/05/14 00:51
- Excel(エクセル) csvに別のExcelの文章を差し込む 2 2023/04/01 16:06
- Excel(エクセル) csvファイルをExcel形式で読み込むには 2 2023/07/03 13:09
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- Visual Basic(VBA) tatsumaru77様 昨日回答して頂いたものです。 すみませんが、昨日の質問で1つ補足があります 1 2022/05/15 15:06
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
【ExcelVBA】各セルをダブルクォーテーションで括ってCSV保存したい
Visual Basic(VBA)
-
Excelでcsvやtxtで保存する時にダブルクォートが勝手に付く
Excel(エクセル)
-
【VBA】ExcelマクロでCSVファイルに保存したデータが"で囲まれてしまう
Visual Basic(VBA)
-
-
4
マクロから出力されるcsvのダブルコーテーションをなくしたい。
Visual Basic(VBA)
-
5
Excelの保存で "を付けないように保存できる?"
Excel(エクセル)
-
6
エクセルで文字列をtxtファイルに変換すると"がつく
Excel(エクセル)
-
7
エクセルの"の削除方法を教えてください。
その他(Microsoft Office)
-
8
カンマ区切りのCSVファイルから"を削除したい
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【ExcelVBA】300万件越えCSVか...
-
【C#】 csvファイルをバイナリ...
-
RubyでCSVファイルの1行目を削...
-
fortranでデータの抜き出しをし...
-
バッチコマンドで指定行を抽出...
-
Excelマクロ 空白セルを無視し...
-
FileListBoxで出すものを絞り込...
-
VBAでcsvファイルもシートもあ...
-
rubyを用いたCSVファイルの分割...
-
fortranでNAのあるデータを読み...
-
パイソンでテキストファイルが...
-
バッチ処理 特定の文字以降を...
-
VBA テキストボックスを選択状...
-
Fortran:列数の分からないデー...
-
INPUTタグ disabledの文字色を...
-
[コンパイルエラー 修飾子が不...
-
rubyプログラムでのフォルダ内...
-
ファイルサイズ
-
SQLでテキストボックスの文字を...
-
区切り文字の調整方法について...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelマクロ 空白セルを無視し...
-
【ExcelVBA】300万件越えCSVか...
-
VBAでcsvファイルもシートもあ...
-
ダブルコーテーション付きでCSV...
-
EXCEL→CSV保存時のダブルクォー...
-
VB.netでShellExecuteがしたい
-
VBAで複数のCSVからレコードセ...
-
StringGridの中身をCSV形式で保...
-
CSVで余計な空行が入る
-
複数のファイルをまたぐエクセ...
-
pythonでリストをCSVに出力する...
-
エクセルの任意のシートをcs...
-
VBA csvファイルのデータを...
-
ブラウザ上でcsvファイルの編集
-
Sikulix2.0.5(Jython2.7.3)でcs...
-
vbaマクロについて 次のような...
-
ファイル名を変数で書きこむfwr...
-
pythonのこのエラーがわかりません
-
バッチコマンドで指定行を抽出...
-
シート内容の文字列を置換してV...
おすすめ情報