VBAでUTF-8文字を読込、Excelに出力する方法
こんにちは。KenKen_SP です。 UTF-8 で書かれたテキストファイルの文字列を読み込んでコードを 試してみましたが、そのまま動きましたね、、意図は何ですか？ Excel2000 以上なら Unicode 対応してますので、Excel内部でのみの 処理なら特に問題はないと思います。理由があって別のキャラセット に変換するならもう一つ ADOBE.Stream を CreateObject し、そちら の Charset を変換したいキャラセットに設定してから、WriteText するなり、CopyTo すればいいです。 こんな感じ。 Sub CONVERT_CHARSET() '参照設定するなら：Microsoft ActiveX Data Objects x.x Library Dim SRC As Object Dim DST As Object Dim strFILEPATH
Shift-JIS のテキストファイルを UTF-8 のテキストファイルに文字コードを変換して保存する。 (ADODB.Stream オブジェクトを使用した場合のサンプル) - Cassiopeiaの日記
試し方 Try_To_Run_This_Macro を実行すると、ファイルを開くダイアログが現れます。 変換したいテキストファイルを選択してOKを押す。 変換されたファイルが utf_8_file.txt という名前で保存される。 さらに... サンプルコードの SecondObj の Charset プロパティを変更することによって utf-8以外にも euc-jp,euc-kr,utf-7...等々にも変換できる。※システムが認識できる文字セット文字列の一覧については、Windows レジストリの HKEY_CLASSES_ROOT\MIME\Database\Charset のサブキーを参照。 ■サンプルコードの前半の半分以上がファイルを開くダイアログを表示するwindows APIの宣言です。こちらもご自由に利用ください。 '............................
☆ Excelでお仕事！(Excel全般の解説サイト) ☆
Excelに関するサイトが数ある中、お越しいただいてまことにありがとうございます。 こちらは仕事に「Microsoft Excel」を活用しようという方を応援するサイトです。 一般事務作業でもプログラム開発分野でも、Microsoft Excelは非常に利用頻度の高いソフトです。 Excelは、ワープロソフトのような単なる文書作成ツールではなく、「データ処理」を行なうことができるもっとも身近なツールです。 豊富なツールや計算式、マクロ等を活用して仕事の合理化・迅速化・精度向上に役立ててもらいたいと思います。 そのために、各ジャンルで目的別のワンポイント集をできるだけ網羅しようとしています。ある程度Excelの経験がある人でも、目的を逆引きに利用していただくと面白い内容が見つかると思います。 また、「ダウンロード」コーナーには、Excelがインストールされていない環境でも利用できるフリーソフ
【インフォシーク】Infoseek ： 楽天が運営するポータルサイト
日頃より楽天のサービスをご利用いただきましてありがとうございます。 サービスをご利用いただいておりますところ大変申し訳ございませんが、現在、緊急メンテナンスを行わせていただいております。 お客様には、緊急のメンテナンスにより、ご迷惑をおかけしており、誠に申し訳ございません。 メンテナンスが終了次第、サービスを復旧いたしますので、 今しばらくお待ちいただけますよう、お願い申し上げます。
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
