sayfalar arası satır atlayarak veri kopyalama

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

sayfalar arası satır atlayarak veri kopyalama

İleti#1)  judlas » 05 Arl 2018 10:50

merhaba

ekteki örnek dosyada belirttiğim gibi sayfa1 de belirli bir satır verim var. bir butona bağlayacağım makro ile butona basınca sayfa2 de bulunan veriler 6 satır atlayarak sayfa1 e yapıştırsın istiyorum. ben bir daha butona basınca bir daha 6 satır atlasın ve aynı verileri yine yapıştırsın istiyorum

Teşekkürler
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
judlas
Siteye Alışmış
 
Kayıt: 14 Kas 2014 19:58
Meslek: Network
Yaş: 40
İleti: 247
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Levent

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#2)  veyselemre » 05 Arl 2018 12:07

Kod: Tümünü seç
Sub Makro1()
    Sheets("Şablon").Range("a1:f5").Copy
    Sheets("Form").Range("a" & Cells(Rows.Count, 1).End(3).Row + 7).Select
    ActiveSheet.Paste
End Sub
Kullanıcı avatarı
veyselemre
Siteye Alışmış
 
Kayıt: 28 Nis 2015 17:53
Meslek: SERBEST
Yaş: 103
İleti: 235
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara / Çubuk

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#3)  judlas » 05 Arl 2018 12:15

üstadım emeğine bilgine sağlık.

peki sablon sayfasındaki satır yüksekliklerinide birebir kopyala yapıştır yaparken form sayfasına yansıtabilirim.

örneğin sablon sayfasında 1. satır 29 yüksekliğinde 2. si 28 yüksekliğinde diğer 3 satır 140 yüksekliğinde

ben form sayfasına bu verileri yapıştırırkende satır yükseklikliklerininde birebir bu şekilde olmasını istiyorum.
Kullanıcı avatarı
judlas
Siteye Alışmış
 
Kayıt: 14 Kas 2014 19:58
Meslek: Network
Yaş: 40
İleti: 247
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Levent

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#4)  judlas » 05 Arl 2018 12:59

kod düzeneğinin içerisine Şöyle bir kod ekledim ama çalışmadı malesef :(

RowHeight = Sheets("sablon").Range("A1:F5").RowHeight
Kullanıcı avatarı
judlas
Siteye Alışmış
 
Kayıt: 14 Kas 2014 19:58
Meslek: Network
Yaş: 40
İleti: 247
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Levent

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#5)  veyselemre » 05 Arl 2018 13:40

Kod: Tümünü seç
Sub Makro1()
    Sheets("Şablon").Range("a1:f5").Copy
    sat = Cells(Rows.Count, 1).End(3).Row + 7
    Sheets("Form").Range("a" & sat).Select
    ActiveSheet.Paste

    For i = 0 To 4
        Rows(i + sat).RowHeight = Sheets("Şablon").Rows(i + 1).RowHeight
    Next i
   
End Sub
Kullanıcı avatarı
veyselemre
Siteye Alışmış
 
Kayıt: 28 Nis 2015 17:53
Meslek: SERBEST
Yaş: 103
İleti: 235
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara / Çubuk

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#6)  judlas » 05 Arl 2018 14:51

üstadım süper harika emeğinize bilginize sağlık.

affınıza sığınarak ufak bir soru daha sormak istiyorum. ben bu kodu butona bağladım. ve her butona basışımda bu veriler kopyala yapıştır geliyor.

ben şimdi bu getirdiğim verilere ait satırları tek bir hamlede silmek istesem. yani en başta form sayfasındaki ilk 5 veri sabit kalacak şekilde sonradan getirdiğim verileri satır seçerek silmek gibi silmek istesem nasıl bir kod olmalı

rowdelete ile alakalı ayrı bir kod olacak bu
Kullanıcı avatarı
judlas
Siteye Alışmış
 
Kayıt: 14 Kas 2014 19:58
Meslek: Network
Yaş: 40
İleti: 247
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Levent

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#7)  veyselemre » 05 Arl 2018 15:06

judlas yazdı:ben şimdi bu getirdiğim verilere ait satırları tek bir hamlede silmek istesem. yani en başta form sayfasındaki ilk 5 veri sabit kalacak şekilde sonradan getirdiğim verileri satır seçerek silmek gibi silmek istesem nasıl bir kod olmalı

rowdelete ile alakalı ayrı bir kod olacak bu

Kod: Tümünü seç
Rows("6:" & Rows.Count).delete
Kullanıcı avatarı
veyselemre
Siteye Alışmış
 
Kayıt: 28 Nis 2015 17:53
Meslek: SERBEST
Yaş: 103
İleti: 235
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara / Çubuk

Cevap: sayfalar arası satır atlayarak veri kopyalama

İleti#8)  judlas » 05 Arl 2018 15:18

çok çok teşekkür ederim üstadım emeğinize bilginize sağlık.
Kullanıcı avatarı
judlas
Siteye Alışmış
 
Kayıt: 14 Kas 2014 19:58
Meslek: Network
Yaş: 40
İleti: 247
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul / Levent


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 3 misafir

cron
Bumerang - Yazarkafe