数式を消して貼り付ける

作った表に数式が入っている場合、数式を削除して値に置き換え貼り付けたい時は
一般機能の『形式を選択して貼り付け』を選べば良いのだが、その中で『値』と『書式』を選択するのは少し面倒なので、このようなマクロを作ってみました。

Sub test()
With Selection
.Copy Destination:=.Offset(.Rows.Count + 1)
.Offset(.Rows.Count + 1).Value = .Value

End With
End Sub

e0080122_22541127.gif

[PR]
by slayer0210 | 2005-11-01 22:57 | マクロ


<< 文字列を改行して結合する カレンダー >>