エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
【ExcelVBA】ブック全体で特定文字(複数可)を削除・置換するマクロ
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
【ExcelVBA】ブック全体で特定文字(複数可)を削除・置換するマクロ
先方では何かしらの判別の為記号を付けて運用しているが、そのままのデータだとVLOOKで当たらなかったり... 先方では何かしらの判別の為記号を付けて運用しているが、そのままのデータだとVLOOKで当たらなかったり、システムに取り込めなかったり等色々と不都合が起きてしまう。 (※弊社実話) 今回はそれらを全シート一括でNULLに置換したい時の為のマクロです。 BulkReplace 以下コピペでそのまま利用可能。 Sub BulkReplace() Dim nSheetCnt As Integer Dim nMOJICnt As Integer Dim objSheet As Excel.Worksheet Dim strMOJI(4) As String ' 置換したい記号を配列で持つ strMOJI(0) = "★" strMOJI(1) = "△" strMOJI(2) = "◇" strMOJI(3) = "●" strMOJI(4) = "◆" ' Sheet数分ループ For nShee