kopyalama sorunu

[yakup123]

arkadaşlar merhaba aşağıdaki kodla bir sayfadan diğerine sutunu kopyalıyorum ancak değer olarak yapıştırmasını nasıl sağlayabilirim
Range("D2" & Range("D2").End(xlDown).Row).Copy Aktif.Range("B25")
saygılarımla

 

[Ömer BARAN]

Merhaba.

Aşağıdaki gibi olabilir.
.

[FONT="Arial Narrow"]Range("D2:D" & Range("D2").End(xlDown).Row).Copy: Range("G5").PasteSpecial Paste:=xlPasteValues
Range("D2").Activate: Application.CutCopyMode = False[/FONT]