エクセルのVBAマクロについて、教えてください。
エクセルのVBAマクロについて、教えてください。 デスクトップにあるtest1フォルダ内の300個くらいのメモ帳の中の特定文字を置換して、空フォルダのtest2に同じファイル名で置換後を保存したいです。 そのようなことは可能でしょうか? 手動だと量が多いので、困っています。お助けください。 \Desktop\テキスト置換\test1:置換前のテキスト (画像サンプルは「\Desktop\テキスト置換\test1\aiueo.txt) \Desktop\テキスト置換\test2:空フォルダに置換後を同じファイル名で保存 \Desktop\テキスト置換\置換リスト.xlsxのA列に変更前、B列に変更後 よろしくお願いします。
Visual Basic | Excel・80閲覧・50
ベストアンサー
以下のブログでかなり近い事を実現するVBAプログラムが公開されているのでこれを元にして作ればできます。 https://kenko-keep.com/vba-cnv-file/ 追加すべきは、 test1フォルダの全ファイルリストをfilesystemオブジェクトで取得して 変換関数にパスを渡すという部分だけで済むはずです。
回答ありがとうございます。 まさにこれをやりたいので、サンプルファイルをダウンロードしてやってみたら、32ビットが使えないようでエラーになりました。 行き詰りました。 「このプロジェクトのコードは、64ビットシステムで使用するために更新する必要があります。 Declareステートメントの確認および更新を行い、 次にDeclareステートメントにPrtSafe 属性を設定してください。」
質問者からのお礼コメント
エラーメッセージの対応も教えてくれて、ありがとうございます! 実行できました。
お礼日時:6/29 0:45