「ただいま」の挨拶よりも電源スイッチONのが先な、そんな日常を綴る『ぽぽろんのパソコンつれづれ日記(ぽぽづれ)』へようこそ。XP/Vista/7の話題。2019.05.15VBAで文字コードの判定を行います。ファイル]と選んでいって、ファイルを選択すると文字コードの判定を自動でしてくれます。この判定がVBAから利用できれば便利なのに、VBAにはその命令がありません。関数を追加するそこで、文字コード(文字エンコード)を判定する関数を作成してみました。エクスプローラーで右クリック→[挿入]→[標準モジュール]として、以下を貼り付けてください。Function判定方法については以下のサイトを参考にさせていただきました。こ...使い方VBAの中から関数として呼び出します。パラメータには検査したいファイル名をフルパスで入力します。Sub結果としては、以下の文字列が返ってきます。手元にあるファイルで試したところ十分に判定してくれています。英数字(ASCII文字)だけのテキストファイルの場合、UTF-8かANSI(シフトJIS)か判定できませんが、「UTF-8」で返すようになっています。コピーぽぽろんをフォローする2この記事を書いた人ぽぽろん「ただいま」の挨拶よりもパソコンの電源を入れる方が先なパソコンおたく。プログラミングもするけど、パソコンを触っていること自体が趣味。ぽぽろんをフォローする2ぽぽろんぽぽづれ。関連記事VBAVBAでCSVの一行を配列に格納するVBAでCSVの一行を配列に格納します。ぽぽろんVBA[VBA]指定した秒数だけ待つ自分用のメモ。非同期処理とかするときに、500msだけ待つ、とかしたいですよね。ぽぽろんVBAVBAでJISコードの文字列をシフトJISコードの文字列に変換するVBAでJISコードの文字列をシフトJISの文字列に変換します。文字コード変換の機能がありません。今回、VBAで文字コード変換を行います。ぽぽろんVBAVBAでシフトJISコードの文字列をJISコードの文字列に変換するVBAでシフトJISコードの文字列をJISコードの文字列に変換します。文字コード変換の機能がありません。今回、VBAで文字コード変換を行います。ID:AzOTUyOTY有意義な記事で助かります。掲載コードの52~63行目にかけて適切な改行がなされていないようです。単なるコピペでは動きませんです。ID:IxNzM5MDcおぼれさん、コメント&ご指摘ありがとうございます。この手の話題が見つからなくて、自分で記事にしたものなので活用していただけるとありがたいです。プログラムについて、修正しました。コメントをキャンセルメールアドレスが公開されることはありません。(44)クリックされた回数:1963最近のコメントぽぽろん2019年12月1日おぼれさん、コメント&ご指摘ありがとうございます。おぼれ2019年11月28日有意義な記事で助かります。ぽぽろん2019年11月17日本日公開のVer2.3.1でビジュアルエディタのボタン機能を改善しました。ユーザーマニュ2019年11月16日Fn+B:Breakキーと同じ機能があります。ぽぽろん2019年11月9日コメントありがとうございます。@popozureSNSフォローボタンぽぽろんをフォローする2ぽぽづれ。(44)クリックされた回数:1963最近のコメントぽぽろん2019年12月1日おぼれさん、コメント&ご指摘ありがとうございます。おぼれ2019年11月28日有意義な記事で助かります。ぽぽろん2019年11月17日本日公開のVer2.3.1でビジュアルエディタのボタン機能を改善しました。ユーザーマニュ2019年11月16日Fn+B:Breakキーと同じ機能があります。ぽぽろん2019年11月9日コメントありがとうございます。etc)74機器構成11タイトルとURLをコピーしました。