Çözüldü Excel Vba İle Sütun Kopyalayıp Diğer Sayfaya Yapıştırma.

[derisa963]

Merhaba Hayırlı Sabahlar.
Ben Sayfa1 deki A,B ve E sütunlarını Sayfa2 deki A,B,C sütunlarına kopyalayıp yapıştırmak istiyorum en alt dolu satira kadar
Bilgisi Olan Varmı ?

 

[Muzaffer Ali]

Merhaba.
Aşağıdaki kodlarla yapabilirsiniz.

    Sheets("Sayfa1").Range("A:B,E:E").Copy
    Sheets("Sayfa2").Select
    Range("A1").Select
    ActiveSheet.Paste

 

[Necdet]

Merhaba,

Sayın dalgalikur'un kodlarını kısaltmak gerekirse :

Sub Aktar()

    Sheets("Sayfa1").Range("A:B,E:E").Copy Sheets("Sayfa2").Range("A1")
    
End Sub

 

[derisa963]

Merhabalar
İnternetten araştırırken şöyle bir kod bulmuştum kendime uyarladım çalıştı .
Destekleriniz için çok teşekkür ederim kardeşlerim

Sheets("BAG").Range("A4:C15000").Value = ""
Dim s1 As Worksheet: Set s1 = Sheets("HAM STOK")
Sheets("BAG").Range("A4:B" & s1.Cells(65536, "A").End(xlUp).Row).Value = s1.Range("A4:B" & s1.Cells(65536, "A").End(xlUp).Row).Value

 

[halit3]

Merhaba Hayırlı Sabahlar.
Ben Sayfa1 deki A,B ve E sütunlarını Sayfa2 deki A,B,C sütunlarına kopyalayıp yapıştırmak istiyorum en alt dolu satira kadar
Bilgisi Olan Varmı ?

Sorunuzu bende okudum cümlenin sonunda (en alt dolu satıra kadar) demşsiniz kopyalana ve yapıştırılan bölümler ile ilgili zaten cümlenin başında sutünları kopyalamak istediğiniz anlaşılıyor arkadaşların yazmış olduğu kodlar bunu yapıyor sizin kodlarınız sutün kopyalamıyor hücre kopyalıyor bilginize

 

[derisa963]

Sorunuzu bende okudum cümlenin sonunda (en alt dolu satıra kadar) demşsiniz kopyalana ve yapıştırılan bölümler ile ilgili zaten cümlenin başında sutünları kopyalamak istediğiniz anlaşılıyor arkadaşların yazmış olduğu kodlar bunu yapıyor sizin kodlarınız sutün kopyalamıyor hücre kopyalıyor bilginize

Sizede teşekkür ederim bu işimi şuan gördü arkadaşlarada daha özel sipariş ederim