![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
下記の書式で、CSV出力させています。
途中割愛の部分は変数をカンマ区切りで1行ずつ積み重ねている過程なので
影響ないと思って省略しました。
Open filePath For Output As #1 ' 作成するファイルを開く
・・・途中割愛・・・
Close #1 '作成するファイルを閉じる
このまま出力すると秀丸だと日本語(Shift-JIS)
Windowsメモ帳だとANSIとなったのですが、
UTF-8(BOM無)で欲しいという指定があったので、どんな記述を加えたら実現できますか?
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
ご質問の話とは違うのですが、私の場合はAutoCADからCSV出力するとBOMありUTF-8で出力され、それを読み込む方のソフトはBOM無しでしか受け付け無いので、毎回メモ帳で開いて「名前を付けて保存」で文字コードをBOM無しUTF-8に変えて保存する。
ということをしています。最初からBOM無しで出力出来れば、もしくは自動変換するツールがあればいいのですが、今のところは、メモ帳に頼ってますね。
No.2
- 回答日時:
BOMありUTF-8だと、回答の付いているADODB.Stream で出来ます。
BOM無しUTF-8は指定できないので、一旦BOMありUTF-8でファイルを作ったあとで、先頭3バイトを削る処理を追加する必要があり、やや面倒です。
ファイルを渡すのに人手が介在するなら、人手でメモ帳などで変換するのが楽です。
人手を介さず自動的に連携するなら、VBAのみで行うのであれば、上記のような処理が必要です。エンコーディング変換用の外部コマンド(iconvとかnkfとか)が使用可能ならShift_JISで書いてコマンドを呼び出して変換するのが楽です。
No.1
- 回答日時:
こんにちは
>どんな記述を加えたら実現できますか?
書き加えるというよりは ADODB.Stream を利用して出力してください。
https://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
準・究極の選択
「年収1000万円で一生カレーライス」か 「年収180万円で毎日何でも食べ放題」 あなたはどちらを選びますか?
-
Excelの数式の効率化について
Excel(エクセル)
-
【マクロ】Ifとwith ステートメントにて分からない部分があります
Excel(エクセル)
-
【マクロ】functionプロシージャの、変数について
Excel(エクセル)
-
-
4
エクセルで数字の組み合わせを列記したい
Excel(エクセル)
-
5
Excelの時刻の不思議
Excel(エクセル)
-
6
エクセル IF計算式?でしょうか?
Excel(エクセル)
-
7
2列に入っているデータを1列で表示する関数について
Excel(エクセル)
-
8
Excel 対象のセルに入力が無いとセルに入力できないようにしたい
Excel(エクセル)
-
9
【Excel】版が同じ事を示す番号を生成したい
Excel(エクセル)
-
10
エクセルでの2項目比較および抽出方法について
Excel(エクセル)
-
11
【関数】スペースがいくつ入った後の文字列を取り出したい
Excel(エクセル)
-
12
エクセルを使っていて2024/5/15と入力したのに令和元年とかででるのでしょうか?何か設定分かる方
Excel(エクセル)
-
13
IF文、条件分岐の整理方法
Visual Basic(VBA)
-
14
Excelの数値の小数点表示について質問です
Excel(エクセル)
-
15
エクセル365 IF??計算式を教えてください
Excel(エクセル)
-
16
Excel-VBAのmsgBox()の不思議
Visual Basic(VBA)
-
17
【マクロ】ファイル名の変更について
Excel(エクセル)
-
18
CSVファイルについて質問です。
Excel(エクセル)
-
19
数字入力後他の文字等が表示される方法について
Excel(エクセル)
-
20
【ExcelVBA】最終行の取得で困ってます
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
pcap形式データをテキストへ抽出
-
アクセス>マクロ>テキスト変換
-
Acccess レポートをグループ別...
-
VC++でUTF-8のファイルを出力し...
-
外国語とCSVについて
-
C言語による10進数→16進数変換...
-
Excel のページを Jpegファイル...
-
ファイル出力の場所を指定
-
CreateProcess関数と実行後の戻...
-
BitBltについて。
-
I/Oエラー(Delphi)
-
Wordマクロで指定したフォルダ...
-
Excel VBA ファイル一覧とファ...
-
OCRで起こしたテキスト文字をCS...
-
CSV形式に変換
-
UNIX & Linux の標準出力で得た...
-
ファイル形式またはファイル拡...
-
VBA でメモ帳へ保存する際の保...
-
コマンド(例えばls)の出力結果...
-
高速置換の方法
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【ExcelVBA】UTF-8(BOM無)でC...
-
コマンド(例えばls)の出力結果...
-
Acccess レポートをグループ別...
-
ファイル出力の場所を指定
-
VC++でUTF-8のファイルを出力し...
-
ファイルの文字コードをUTF-8に...
-
CreateProcess関数と実行後の戻...
-
VBA でメモ帳へ保存する際の保...
-
テキストファイルに改行コード...
-
シェルコマンドの 2>&1 とはど...
-
外国語とCSVについて
-
ファイル形式またはファイル拡...
-
AccessVBA複数レポート条件毎に...
-
printfだと出力されるのにfprin...
-
1行ずつではなくまとめてファイ...
-
pcap形式データをテキストへ抽出
-
C言語のプログラムが異常終了し...
-
Wordマクロで指定したフォルダ...
-
CBool関数について VB6とVB.net...
-
C言語での印刷方法
おすすめ情報