3行マクロ 26回
Excelを使っていて、再計算が行われないように、セルの計算式を消して結果の値だけを残したい場合、数式を値に変換する必要があります。
値の貼り付けを行うのが普通だと思いますが、Sheetが複数あったり、計算式が大量にある場合などは、マクロで行う方法が早くて簡単です。
マクロの記録機能で、値の貼り付けをするマクロも作成することができます。方法は、こちらでマクロ講座16回紹介しています。
今回は、コードで書いてしまうので、もっとシンプルになってしまいます。
(サンプルファイルは、こちらから 3行マクロ26回サンプルデータ)
Excelバージョン:
Sub 数値を残して数式削除()
Selection.Value = Selection.Value
End Sub
実行すると、
Sub 数値を残して数式削除2()
Range("Sheet2!B7:G7").Value = Range("B7:G7").Value
End Sub
Sub 数値を残して数式削除3()
With Worksheets("Sheet2").Range("B7:G7")
.Value = .Value
End With
End Sub
Selection.Value = Selection.Valueという前後一緒の式では、一見何もしていないように見えますが、数式が入力されているセルから値を取得して、同じ範囲に代入しなさいという操作をしています。