VBA 値のみコピーについて

Question

VBAでmainファイルから、Updateファイルへコピー処理をおこなっているのですが、
それを、値のみコピーに変更するには、どの様に変更すればよいか、お教え願いませんでしょうか。

このままだと、もとのmainファイルに背景色等が逢った場合に、そのまま背景色もコピーされるので、
値のみコピーに変更したいんですが...

test_main.Worksheets(sh_fm).Range(ad_kb_fm).Offset(row - 1, 0).Copy Destination:=test_Update.Worksheets(sh_to).Range(ad_kb_to).Offset(rowcnt - 1, 0)

ご存知のかた、どうぞよろしくお願いいたします。

Answer 1

CopyメソッドでDestinationを指定すると
Activesheet.Pasteと同じ動作をするため
値以外も貼り付けられます。

値のみを指定する場合はDestinationを指定せず、
PasteSpecialメソッドでxlPasteValuesを使用します。

Range("A1").Copy　'貼り付け元
Range("A2").PasteSpecial Paste:=xlPasteValues　'貼り付け先

Range("A1")が貼り付け元の範囲
Range("A2")が貼り付け先の範囲
なのでそれを当てはめるとこうなります。

test_main.Worksheets(sh_fm).Range(ad_kb_fm).Offset(row - 1, 0).Copy
test_Update.Worksheets(sh_to).Range(ad_kb_to).Offset(rowcnt - 1, 0).PasteSpecial Paste:=xlPasteValues

Comments

[Pun_hiro]

test_main.Worksheets(sh_fm).Range(ad_kb_fm).Offset(row - 1, 0).PasteSpecial Paste:=xlPasteValues =test_Update.Worksheets(sh_to).Range(ad_kb_to).Offset(rowcnt - 1, 0).Copy
という記述でよろしいのでしょうか....
すみません。教えて下さい....

[Pun_hiro]

ありがとうございました。
できました。
もう一度勉強しなおします。

[radames1000]

基礎を飛ばしてどんどん進もうとするとご自身が大変になってしまいます。
がんばってください。

[Pun_hiro]

承知しました。
とても良いご指摘、ありがとうございます。

Answer 2

Excel VBA セルの値だけをコピーして貼り付ける方法

でどうでしょう

Comments

[Pun_hiro]

ご回答ありがとうございます。

test_main.Worksheets(sh_fm).Range(ad_kb_fm).Offset(row - 1, 0).Copy Destination:=test_Update.Worksheets(sh_to).Range(ad_kb_to).Offset(rowcnt - 1, 0)
この部分でいうととういう追記をすればよろしいのでしょうか。。。