- ベストアンサー
エクセルマクロ コピーして数値を置き換えてペースト
下記内容のマクロをご教示願います。 ①「元データ」シートの最下行のデータをコピーして「変換データ」シートの最下行の次行 にペースト ②その際、以下のルールでペースト 0~9.9→1(データが0~9.9の場合、1に置き換える。以下同じ) 10.0~19.9→10 20.0~29.9→20 ・ ・ ・ 90.0~99.9→90 100.0以上→100 ※データは0.1刻み(小数点第1位が「0」の場合は整数で表記)
下記内容のマクロをご教示願います。 ①「元データ」シートの最下行のデータをコピーして「変換データ」シートの最下行の次行 にペースト ②その際、以下のルールでペースト 0~9.9→1(データが0~9.9の場合、1に置き換える。以下同じ) 10.0~19.9→10 20.0~29.9→20 ・ ・ ・ 90.0~99.9→90 100.0以上→100 ※データは0.1刻み(小数点第1位が「0」の場合は整数で表記)
補足
ありがとうございます。ベリーグッドです。最後に下記のマクロはどのような処理をしているか詳解していただければ幸いです。 ws2.Cells(ws2LastRow + 1, mCol).Value = Int(ws1.Cells(ws1LastRow, mCol).Value / 10) * 10