üretim listesi

Katılım
10 Temmuz 2008
Mesajlar
12
Excel Vers. ve Dili
2007 türkce
merhaba arkadaşlar benim acil yardıma ihtiyacım var. tablo ekte , yapmak istediğim ana listedeki her eklediğim bayi kendi bağlı olduğu şöförün sayfasına gitsin.soldan saha doğru. ilgilenenlere şimdiden teşekkürler
 

dEdE

Destek Ekibi
Destek Ekibi
Katılım
1 Temmuz 2005
Mesajlar
2,607
Excel Vers. ve Dili
Ofis 2013 TR 64 Bit
Merhaba,
Galiba örnek dosya eklemeyi unutmuşsunuz. :)
 

dEdE

Destek Ekibi
Destek Ekibi
Katılım
1 Temmuz 2005
Mesajlar
2,607
Excel Vers. ve Dili
Ofis 2013 TR 64 Bit
Merhaba,

Ekli dosyayı nceler misiniz?
 

Ekli dosyalar

Katılım
10 Temmuz 2008
Mesajlar
12
Excel Vers. ve Dili
2007 türkce
eline sağlık çok güzel olmuş ama onu tek tuşla yapmamız mümkün değil mi. senden ricam bide bana nasıl yaptığğını açıklarsan bende kendi başımın çağresine bakaım sanırım :)))
 

dEdE

Destek Ekibi
Destek Ekibi
Katılım
1 Temmuz 2005
Mesajlar
2,607
Excel Vers. ve Dili
Ofis 2013 TR 64 Bit
eline sağlık çok güzel olmuş ama onu tek tuşla yapmamız mümkün değil mi. senden ricam bide bana nasıl yaptığğını açıklarsan bende kendi başımın çağresine bakaım sanırım :)))
Merhaba,
Öyleyse bir de ekli dosyayı inceleyiniz.
 

Ekli dosyalar

Katılım
10 Temmuz 2008
Mesajlar
12
Excel Vers. ve Dili
2007 türkce
dede sanırım hata var sadce en altaki satırı aktarıyor. oda sadece 2. sayfaya ben birde mesela alta kayıt ekleyince formül bozulmaz değil mi. mesela bin tane müşteri olunca
 

dEdE

Destek Ekibi
Destek Ekibi
Katılım
1 Temmuz 2005
Mesajlar
2,607
Excel Vers. ve Dili
Ofis 2013 TR 64 Bit
dede sanırım hata var sadce en altaki satırı aktarıyor. oda sadece 2. sayfaya ben birde mesela alta kayıt ekleyince formül bozulmaz değil mi. mesela bin tane müşteri olunca
Merhaba,
Önceki mesajıma ekli dosyada da belirttiğim üzere;aktif hücrenin bulunduğu satırı A sütununda belirtilen sayfaya kopyalar.
Dolayısı ile en alttaki satırı değil, hangi hücre aktif ise o satırı, yine o satırın A sütununda belirtilen sayfaya aktarıyor.
Örnekte; son satırın A sütununda 2 yazdığı için 2. sayfaya aktarıyor.
65536 müşteriye kadar sorunsuz çalışır.
 

dEdE

Destek Ekibi
Destek Ekibi
Katılım
1 Temmuz 2005
Mesajlar
2,607
Excel Vers. ve Dili
Ofis 2013 TR 64 Bit
Merhaba,

......Peki hepsini tek seferde aktara asınca neden olmuyo
demişsiniz.

Şunun için olmuyor. Koyu satırlar ilk mesajınızdan

...... tablo ekte , yapmak istediğim ana listedeki her eklediğim bayi kendi bağlı olduğu şöförün sayfasına gitsin.soldan saha doğru. .......
Özetle; Hepsini bir defada aktarmak istediğinizi belirtmemişsiniz. Önceki kodu silip, aşağıdakileri kullanırsanız hepsini bir defada aktarır.

Kod:
Sub Aktar()
    Set s1 = Sheets("ANA LİSTE")
    For i = 3 To s1.[A65536].End(3).Row
    Set sX = Sheets("" & Cells(i, 1).Value & "")
    ssH = sX.[A65536].End(3).Row + 1
    sX.Range("A" & ssH & ":K" & ssH).Value = s1.Range("B" & i & ":L" & i).Value
    Next
End Sub
 
Son düzenleme:
Üst