• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Alt satıra yapıştırma

kadir78

Altın Üye
Katılım
6 Nisan 2016
Mesajlar
227
Excel Vers. ve Dili
office 2019
İyi günler. Aşağıdaki kodlamada ilk yapıştırmayı yapıyor fakat ikinci yapıştırmayı ilk yapıştırmanın üstüne yazıyor. İkinci yapıştırmayı bir alttaki boş satıra yapıştırmasını nasıl sağlarım. Çözüm bulamadım lütfen yardım edermisiniz.
Kod:
say3 = s1.range("K1").End(3).Row + 1

s4.range("B3:F17").specialcells(xlcelltypeconstants, 23).copy
s1.range("K" & say3).pastespecial paste :=xlpastevalues

s4.range("H3:L17").specialcells(xlcelltypeconstants
s1.range("K" & say3).pastespecial paste :=xlpastevalues
 
ikincisinde
say3+1 şeklinde kullanın
 
ÖmerFaruk bey çok teşekkür ederim sağolun.
 
Geri
Üst