–vba-geek.jpからお引っ越し。VBA以外の情報の方が多くなってきたので名前も変えてリニューアルしました。2018.11.07AccessのVBAでファイルの文字コードを変換するサンプルプログラムを覚書。ファイルの文字コード変換自体はフリーソフトとか使えば簡単に出来るのですが、どうしてもプログラム中でファイルの文字コードを変換しつつ処理を実行する必要があったため作成しました。実際には別のプログラムからこのプログラムを呼び出して大量にあるテキストファイルの文字コードを変換しつつ処理をするプログラムを作成しましたが、この記事では文字コード変換部分だけを覚書しておきます。Library"にチェックを付けておく必要があります。Library"は、複数のバージョンが選択できる場合がありますが、その際は一番バージョン番号が高いものにチェックを付ければよいです。サンプルプログラムは、AccessのVBAで記載されていますが、基本的にはExcelのVBAでも使用できます。ExcelのVBAで使用する際も参照設定を忘れないようにしてください。文字コードを変換するサンプルプログラムの処理概要このプログラムの処理の考え方としては、以下のとおりです。元々のテキストファイルの文字コードと同じ"箱"と変換したい文字コードの"箱"の2つを用意する。元々の文字コードの"箱"に一旦ファイルの中身を入れる。元々の文字コードの"箱"の中身を別で用意した変換したい文字コードの箱に移しかえる文字コードを変換するVBAのサンプルプログラム以下に文字コードを変換するサンプルプログラムを記載します。使い方としては、変更前の文字コードと変換後の文字コードを引数として指定して別のプロシージャから呼び出して実行する。元のファイルが"EUC-JP"で、それを"UTF-8"に変更したい場合は、以下のようにCallで呼び出して実行すれば良い。以下に文字コードを変換するサンプルプログラムを呼び出す側のプロシージャの例を記載しておきます。Sub変換前のファイルが本当に指定した文字コードかどうかをチェックした上で呼び出すことが望ましいので、文字コードをチェックするプログラムも同時に作ったのですが、そのプログラムについては、別の記事で紹介します。ちなみに単にファイルの文字コードを変換したい(自動じゃなくて良い)のであれば、以下のフリーソフトが超絶便利なのでこちらを使いましょう。ファイルが多量にあっても一括して変換してくれるし高速です。文字コード変換ツール「KanjiTranslator」(フリーソフト)www.kashim.com大変お世話になっているとても良いソフトです。入力データに半角カタカナが含まれていないかチェックするユーザー定義関数をVBAで作成したので覚書しておく。いうチェック方法が一番いいか色々考えたあげく、一番シンプルでわかりやすいと思った方法は以下の通り。VBA:画像ファイルの画像を指定したセルのサイズを合わせて貼り付けるサンプルプログラム画像ファイルの画像をExcelに挿入、指定したセルに合わせたサイズに変更して貼り付けるサンプルプログラムを覚え書き。応用例として複数ある画像ファイルをタイル状に指定セルに貼り付けるサンプルプログラムも作成しました。VBA:FileSystemObjectで指定したフォルダのサブフォルダも含めてファイル名の一覧を取得してセルに書き出すVBAのサンプルプログラムFileSystemObjectを使用して指定したフォルダのサブフォルダも含めて保存されている全てのファイルのファイル名を取得してExcelのセルに書き出すVBAのサンプルプログラムを覚書。VBA:マウスポインタの形状を砂時計などに変更するサンプルプログラムExcelのVBAを使用してマウスポインターの形を変更するサンプルプログラムを覚書。思い出すのに少し時間がかかったから覚書。VBA共通VBAで作成したFunctionプロシージャ(ユーザー定義関数)で戻り値として複数の値を返すサンプルプログラムを覚書。サンプルプログラムは、ExcelのVBAで作ってありますが、Accessでもそのまま使用できます。VBAVBA共通:”(“や”[“などの記号で囲まれた(くくられた)文字列の文字列部分(中身)だけを抽出する関数のサンプルプログラムカッコ"("や角括弧"["などの記号で囲まれた(くくられた)文字列から記号を省いた中身の文字列だけ抽出するVBAの関数(ファンクションプロシージャ)のサンプルプログラムを覚書。ありがとうございます。ID:UxNTQ1MDQコメントと指摘ありがとうございます。しているので間違いではないのですが、意味がなかったですね。コメントをキャンセルメールアドレスが公開されることはありません。コメントデータの処理方法の詳細はこちらをご覧ください。存在しないか、アクセスが拒否されました。最近のコメントパパング♂2024.08.08デスクトップテーマの表示方法が変わったので大変記事が参考になりました。ありがとうございます。issue...マルウェア:「新しいHao123をスタートページに設定しませんか?」メッセージを二度と表示させないようにする方法ななし2023.10.15結局この手のコピペ記事は、じゃあ何がクリップボードにアクセスしているのか、という原因にアプローチしていないExcel:セルをコピーしたときに「内容をクリップボードにコピーできませんでした。...」メッセージが表示されるたなかみみ2023.10.07記事を拝見しました。公式チャンネルの動画(アーティストのミュージックビデオとか)に対応していないのがちょっと残念ですね。征子2023.10.07エラー内容をクリップボードにコピーできませんでした。他のアプリケーションで使用されています。このブック内にコンテンツを貼り付けすることはできますが、他のアプリケーションでは使用できません。表示でコ...Excel:セルをコピーしたときに「内容をクリップボードにコピーできませんでした。VBAVBA共通サイトポリシーサイトマップホーム検索トップサイドバータイトルとURLをコピーしました。