Tekrarlayan satırlı verileri 1.satırdan itibaren yazdırma

[mustafag26]

Merhaba herkese iyi günler,

Çözümünün basit olduğunu düşündüğüm, ama bir türlü bulamadığım bir konuda yardımınıza ihtiyacım var. "VERİ" isimli sayfada değişik özellikte ürünlerim var, bu listede ürünlerle beraber "SERİ NO" sütunum var.Seri no bir ürün kodundan üretilen ürünlerin sıra numarasını ifade ediyor. Benim yapmaya çalıştığım şey "VERİ" sayfasındaki filtreden bir Ürün Kodu seçip bu ürünün seri numaralarıyla beraber (bütün satırı da) 2.sayfaya 1.satırdan itibaren getirebilmek. Vlookup'la denedim ama tek bir Seri No getirdi. Örnek bir dosya yükledim "İSTENEN DURUM" sayfasında ne yapmaya çalıştığımı daha kolay anlarsınız. Filtrede ürünü seçtiğimde "VERİ" sayfasında 32,33,34. satırlardaki ürün diğer sayfada 1,2, ve 3.satırda olmalı. Biraz uzun yazdım fakat umarım derdimi anlatabilmişimdir. Yardımlarınız için şimdiden teşekkürler.

 

[Huseyinkis]

Merhaba herkese iyi günler,

Çözümünün basit olduğunu düşündüğüm, ama bir türlü bulamadığım bir konuda yardımınıza ihtiyacım var. "VERİ" isimli sayfada değişik özellikte ürünlerim var, bu listede ürünlerle beraber "SERİ NO" sütunum var.Seri no bir ürün kodundan üretilen ürünlerin sıra numarasını ifade ediyor. Benim yapmaya çalıştığım şey "VERİ" sayfasındaki filtreden bir Ürün Kodu seçip bu ürünün seri numaralarıyla beraber (bütün satırı da) 2.sayfaya 1.satırdan itibaren getirebilmek. Vlookup'la denedim ama tek bir Seri No getirdi. Örnek bir dosya yükledim "İSTENEN DURUM" sayfasında ne yapmaya çalıştığımı daha kolay anlarsınız. Filtrede ürünü seçtiğimde "VERİ" sayfasında 32,33,34. satırlardaki ürün diğer sayfada 1,2, ve 3.satırda olmalı. Biraz uzun yazdım fakat umarım derdimi anlatabilmişimdir. Yardımlarınız için şimdiden teşekkürler.

Yapılacak işlem macro ile olabilirmi yoksa formullemi olmasını istiyorsunuz?

 

[mustafag26]

Mümkünse Macro kullanmayalım çünkü verilerim Sql'den geliyor ona göre ayarlama yapmak çok zaman dikkat gerektirir.

 

[Huseyinkis]

Mümkünse Macro kullanmayalım çünkü verilerim Sql'den geliyor ona göre ayarlama yapmak çok zaman dikkat gerektirir.

Ben yinde Macro kodları ile yapılmış bir ornek veriyim.Formuller yapılmış halini bulmayta çalışırım..

Bunu ornek dosyanızın içinde iken ALt+F11 tuşları ile kod kısmını açın ve solda yazan Sayfa3(İstenen Durum) kısmını tıklayarak sağda açılan kod kısmınına yapıştırın sonra excel sayfasına donerek istenilen kısım sayfasında G1 hücresine istediğiniz kodu yazın bilgileri gelicektir örnek olarak kullanabilirsiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [G1]) Is Nothing Then Exit Sub
Set s1 = Sheets("VERİ")
Set s2 = Sheets("İSTENEN DURUM")
Range("A2:D5000").Clear
List = Target
For i = 1 To s1.Range("a65536").End(3).Row
If s1.Cells(i, 1).Value = List Then
sonsat = s2.Range("a65536").End(3).Row + 1
s2.Cells(sonsat, 1).Value = s1.Cells(i, 1).Value
s2.Cells(sonsat, 2).Value = s1.Cells(i, 2).Value
s2.Cells(sonsat, 3).Value = s1.Cells(i, 3).Value
s2.Cells(sonsat, 4).Value = s1.Cells(i, 4).Value
End If
Next
End Sub

 

[İhsan Tank]

Merhaba herkese iyi günler,

Çözümünün basit olduğunu düşündüğüm, ama bir türlü bulamadığım bir konuda yardımınıza ihtiyacım var. "VERİ" isimli sayfada değişik özellikte ürünlerim var, bu listede ürünlerle beraber "SERİ NO" sütunum var.Seri no bir ürün kodundan üretilen ürünlerin sıra numarasını ifade ediyor. Benim yapmaya çalıştığım şey "VERİ" sayfasındaki filtreden bir Ürün Kodu seçip bu ürünün seri numaralarıyla beraber (bütün satırı da) 2.sayfaya 1.satırdan itibaren getirebilmek. Vlookup'la denedim ama tek bir Seri No getirdi. Örnek bir dosya yükledim "İSTENEN DURUM" sayfasında ne yapmaya çalıştığımı daha kolay anlarsınız. Filtrede ürünü seçtiğimde "VERİ" sayfasında 32,33,34. satırlardaki ürün diğer sayfada 1,2, ve 3.satırda olmalı. Biraz uzun yazdım fakat umarım derdimi anlatabilmişimdir. Yardımlarınız için şimdiden teşekkürler.

merhaba
eki inceler misiniz
E1 hücresine yazdığınız bilgiye göre diğer bilgiler geliyor
yeşil boyalı alandaki formüller dizi formülüdür.

Dizi Formülü Formül Hücreye Girildikten Sonra Enter Tuşuna Basmadan Ctrl+Shift+Enter Tuş Kombinasyonu İle Aktif Olmaktadır. Formülün Başında Ve Sonunda { } Bu İşaretler Çıkar Elle Eklediğiniz Takdirde Formül Hata Verir.

formüllerde 1000 satır baz alınmıştır

1000 satır'ı değiştirmek için ctrl+h yapın aranan değere $1000 yeni değere $10000 yazın ve tümünü değiştir deyin.
$10000 olan yeri kendinize göre ayarlayınız.

 

[mustafag26]

İhsan Bey çok teşekkürler tam istediğim gibi bir sonuç aldım. Hüseyin Bey size de ilgilendiğiniz için teşekkür ederim.

 

[İhsan Tank]

İhsan Bey çok teşekkürler tam istediğim gibi bir sonuç aldım. Hüseyin Bey size de teşekkür ederim ilgilendiğiniz için.

rica ederim
Bende Sayın : Huseyinkis teşekkür ederim.
:yazici:

 

[Orion1]

Merhaba herkese iyi günler,

Çözümünün basit olduğunu düşündüğüm, ama bir türlü bulamadığım bir konuda yardımınıza ihtiyacım var.

Çözümü basitse niye çözümü bulamadınız.
Çözümü bulan arkadaşlar basit bir şeyi çözmüş olacaklar diilmi?!!!

 

[mustafag26]

Çözümü basitse niye çözümü bulamadınız.
Çözümü bulan arkadaşlar basit bir şeyi çözmüş olacaklar diilmi?!!!

Üslubunuzu ve Türkçe kullanımınızı yaşınıza yakıştıramadım.

 

[İhsan Tank]

Üslubunuzu ve Türkçe kullanımınızı yaşınıza yakıştıramadım.

bende bu yanıtınızı anlamadım
ne elde etmek istiyorsunuz

 

[mustafag26]

bende bu yanıtınızı anlamadım
ne elde etmek istiyorsunuz

Sizden rica ettiğim şeyi küçümsediğim yazılmış, böyle bir anlam nasıl çıkarılmış niye böyle ifade edilmiş anlamak zor. Çocuk yaşta denebilecek kişiler söylese güler geçerim ama 50 yaşında bir insana yakıştıramadım.

 

[İhsan Tank]

Sizden rica ettiğim şeyi küçümsediğim yazılmış, böyle bir anlam nasıl çıkarılmış niye böyle ifade edilmiş anlamak zor. Çocuk yaşta denebilecek kişiler söylese güler geçerim ama 50 yaşında bir insana yakıştıramadım.

öyle bir şey yok sen demişsin ki basit hocam da sana demiş ki basitse neden bizi uğraştırıyorsun basit'i herkes çözer ama sen ona ilginç bir karşılık vermişsin şahsen ben hiç sevmedim yanıtınızı sizin yerinizde olsam bir kere daha gözden geçiririm yazdıklarımı ve hocamın yazdıklarını haksız olduğunu anlayacaksınız. sizden ona göre özür bekliyorum bende

 

[mustafag26]

öyle bir şey yok sen demişsin ki basit hocam da sana demiş ki basitse neden bizi uğraştırıyorsun basit'i herkes çözer ama sen ona ilginç bir karşılık vermişsin şahsen ben hiç sevmedim yanıtınızı sizin yerinizde olsam bir kere daha gözden geçiririm yazdıklarımı ve hocamın yazdıklarını haksız olduğunu anlayacaksınız. sizden ona göre özür bekliyorum bende

Hocanız sizin söylediğiniz gibi yazsaydı böyle cevap vermezdim emin olun. İnsanlar saygıyı forumdaki rütbelere göre gösteriyorlarsa söyleyecek lafım yoktur.

 

[İhsan Tank]

Hocanız sizin söylediğiniz gibi yazsaydı böyle cevap vermezdim emin olun. İnsanlar saygıyı forumdaki rütbelere göre gösteriyorlarsa söyleyecek lafım yoktur.

onu ima ettiğini ben anladım ama siz anlamamışsınız
bundan sonra benden size yardım yok
ne zaman ki hocam'dan özür dilersiniz bende o zaman yardım etmeye devam ederim
kendinize çok iyi bakın

 

[Orion1]

Tarafımdan kilitlenmiştir.