EXCEL 値のみをコピーするマクロ

質問

お世話になります。

特定のセル（M2）からアクティブセル（クリックで指定したセル）へ「値のみ」をコピーするマクロを考えています。
現在は「そのままコピー」するマクロになっているので、「値のみコピー」へ変更するには
どうすればいいでしょうか？

Sub 追番貼付け()
'
'
Worksheets("データ検索用").Range("M2").Copy
Sheets("見積書").Select
ActiveSheet.Paste
Application.CutCopyMode = False

End Sub

回答No.1

mt2008 · ベストアンサー

Copy/Paste は、しなくても良いです。

Sub 追番貼付け2()
　　ActiveCell.Value = Worksheets("データ検索用").Range("M2")
End Sub

お礼

ありがとうございます。

VBAに入力してみたところ、動作する事を確認しました。
こんな簡単な式でよかったのですね・・

回答No.2

FEX2053

#1さんの通りっちゃ～通りなんですが、

Worksheets("データ検索用").Range("M2").Copy
Sheets("見積書").Select
Selection.PasteSpecial Paste:=xlPasteValues

これが、「値貼り付け」のコードになります。

お礼

ありがとうございます。

調べたところ、こちらの式は結合セルでも使えそうですね。
Valueと使い分けてみます。