質問: エクセルマクロ 数値の置き換えについて こんにちは、お客さんエクセルのデータ編集で難儀していまして 何とかいい方法を模索中です。 今エクセルのマクロ(vb)を使って下記の動作を実行できないか 悩んでいます。こんなのは出来ますか? <例> 商品c 金額 記号 a001 100 a002 100 a003 200 * a004 300 ・ ・ ・ これが、延々続くのですが、『*』がついている行はマイナスを意味します。 <やりたいこと(1)> * が入って居れば金額にマイナス1を掛けて値をマイナスにして置換えを したいのです。 <やりたいこと(2)> この作業をグルグル回して行きたいのですが、商品cの値が無くなれば 処理をそこでストップしたいのです。 参考書等を見ながらやっているものの、中々進まず・・・ 宜しくお願いします。
回答: こんな感じでしょうか。 但し、商品c 金額 記号はそれぞれa~c列にあるものとします。 sub test01() with activesheet x = .cells(rows.count, "a").end(xlup).row for i = 1 to x if .cells(i, "c") = "*" then .cells(i, "b") = .cells(i, "b") * -1 end if next end with end sub