Belirli Aralıktaki verileri aktif hücrenin belirli aralığına yapıştırma

[meslek5]

Belirli Aralıktaki verileri aktif hücrenin belirli aralığına aktarabilirmiyiz.

Sheets("Sayfa1").Range("BR6:EC6") = Sheets("Sayfa1").Range("BR4:EC4").Value kodu ile tanımlı aralığa yapıştırabiliyorum ama belirli bir yapıştırma adresi yok yani sürekli değişiyor. Aktif hücreye göre nasıl ayarlayabiliriz.

örnek: BR10 satırında isem verileri "BR10:EC10" aralığına yapıştırsın

 

[Ömer BARAN]

Merhaba.

Sorularınızı; gerçek belgenizin, özel bilgi içermeyen kopyası şeklinde hazırlayacağınız
örnek belge üzerinden sorarsanız daha hızlı sonuca ulaşırsınız.

Örnek belge özellikleri ve örnek belge yükleme yöntemine ilişkin kısa açıklama cevabımın altındaki İMZA bölümünde var.

Kopyalanan alan, aşağıdaki;
-- kırmızı renklendirdiğim kod ile, seçili olan hücreden itibaren TÜMÜYLE (biçimi/varsa formülü vs ile birlikte) yapıştırılır,
-- mavi renklendirdiğim kod ile ise seçili hücreden itibaren DEĞER olarak yapıştırılır.

   Sheets("....").Range(".....").Copy ActiveCell

    Sheets("....").Range(".....").Copy :  ActiveCell.PasteSpecial Paste:=xlPasteValues