質問: エクセルのマクロ(大量データを置換する方法) マクロについてお詳しい方がいらっしゃれば ご教授頂きたいです。 シート1のa1~c100に入力されているデータすべてを 対象に、 シート2のa1が検索されれば→b1に置換 a2が検索されれば→b2に置換 ・・・・・ というように、別シートを参照して置換をさせたいのですが このようなことはできるのでしょうか。 配列を利用するやり方は、他のご質問で拝見致しましたが 置換する内容が変わりやすいので、編集の利便性を考えて 上記のようにしたいと思っています。 以上、知見のある方、お知恵をお貸し頂けますでしょうか。
回答: こんばんは! 横からお邪魔します。 sub sample1() dim i as long, c as range, ws1 as worksheet, ws2 as worksheet set ws1 = worksheets("sheet1") set ws2 = worksheets("sheet2") application.screenupdating = false for i = 1 to ws2.cells(rows.count, 1).end(xlup).row for each c in ws1.range("a1:c100") if instr(c, ws2.cells(i, 1)) > 0 then c = replace(c, ws2.cells(i, 1), ws2.cells(i, 2)) end if next c next i application.screenupdating = true end sub こんな感じではどうでしょうか?m(_ _)m