Soru Kopyalama hakkında

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
Merhaba iyi aksamlar
Sayfa1 deki verileri yani A2 ile K2 arasındaki tüm dolu satırları seçip
Sayfa2 de A2 ile K2 son boş satıra yapıştırmak ve sonra ve yapıştırma bitince sayfa1 deki verileri temizleme
Yardımcı olur musunuz ?
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,779
Excel Vers. ve Dili
Microsoft 365 Tr-64
Son=Sheets("Sayfa2").Range("A"&Rows.Count). End(3)+1
Sheets("Sayfa1").Range("A2:K2").Copy
Sheets("Sayfa2").Range("A" & Son, "K" & Son).PasteSpecial xlPasteValues
Sheets("Sayfa1").Range("A2:K2").ClearContents
 

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
Son=Sheets("Sayfa2").Range("A"&Rows.Count). End(3)+1
Sheets("Sayfa1").Range("A2:K2").Copy
Sheets("Sayfa2").Range("A" & Son, "K" & Son).PasteSpecial xlPasteValues
Sheets("Sayfa1").Range("A2:K2").ClearContents
ömer bey ilk satırda hata verdi typme missmatch
Son = Sheets("Cikis").Range("A" & Rows.Count).End(3) + 1
Sheets("SEPET").Range("A2:K2").Copy
Sheets("Cikis").Range("A" & Son, "K" & Son).PasteSpecial xlPasteValues
Sheets("SEPET").Range("A2:K2").ClearContents

sepet sayfasındakileri cikis sayfasına kopyalanacak
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,779
Excel Vers. ve Dili
Microsoft 365 Tr-64
..
İlk satır hata veriyorsa sayfanızın adı Cikis değildir.
Son değişkenini Long olarak tanımlamayı unutmayın.
 

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
..
İlk satır hata veriyorsa sayfanızın adı Cikis değildir.
Son değişkenini Long olarak tanımlamayı unutmayın.
sayfa adı Cikis doğru ve dim son as long olarak tanımladım yine aynı malesef
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,779
Excel Vers. ve Dili
Microsoft 365 Tr-64
Kullandığınız dosyayı ve exceli komple kapatıp tekrar deneyin.
Olmazsa dosyanızı paylaşın lütfen.
 
Üst