Şartlı Veri Aktarımı...

[manly]

Ekte gönderdiğim dosya açıldığında...Menüye tıkladığımda açılan form üzerinde yapılmasını istediğim,

Yeni Sıra No karşısındaki Comboboxta B sütunundaki bir veriyi seçtiğimde zaman (süzülmesi) sonucunda onunla ilgili bilgilerin aşağıya dökülmesini istiyorum...Öncelikle böyle bir şey mümkün mü?

Eğer mümkünse verilerde oynama yaptığımda da değişikliklerin kaydedilmesi....

 

[Mustafa MUTLU]

Mümkündür eminim.
Ama ne istediğini tam açıklarmısın.
Süz işleminde bu istediğin oluyor zaten.

Sen bir form hazırlamışın.
Form daki ComboBox1 den bir saçim yaptığında o seçimin text lere gelmesini mi istiyorsun.

Anladığım kadarıyla kayıt üzerinde değişiklik yapmak istiyorsun
bunu da form üzerinden yapmak istiyorsun.
Doğru mu ?..

 

[manly]

Mümkündür eminim.
Ama ne istediğini tam açıklarmısın.
Süz işleminde bu istediğin oluyor zaten.

Sen bir form hazırlamışın.
Form daki ComboBox1 den bir saçim yaptığında o seçimin text lere gelmesini mi istiyorsun.

Anladığım kadarıyla kayıt üzerinde değişiklik yapmak istiyorsun
bunu da form üzerinden yapmak istiyorsun.
Doğru mu ?..

Aynen hocam ....

 

[Mustafa MUTLU]

Peki seçimi stok numarasına göre yapsak
ve seçtiğimiz bir veri form üzerine gelse
onun üzerinde değişiklik yapsak.
Daha sağlıklı ve sonuçlarımız daha doğru olur.
senin için bu uygun mu ?..
Yeni Sıra No da aynı sonuçta çok sayıda veri var.
stok numarasında her veri için bir adet var sanırım..
yada malzeme adına göre de olabilir.

 

[manly]

Stok numarası da aynı olanlar var, Yeni Sıra No ya olması gerekiyor hocam...

Yeni Sıra No ya göre yapmamızın nedeni o malzemeye çekilen verileri görebilmek için...

 

[Mustafa MUTLU]

Şimdi :
ComboBox1 e verileri şu şekilde çağırıyoruz.
Bu Kodlar Formunuzun Kod Bçlümüne

Private Sub UserForm_Initialize()
ComboBox1.RowSource = "LİSTE!B2:K65536"
End Sub

Bu da Combo dan veri seçtiğinizde o verinin Text lere gelmesini sağlar.((1) bu sağa doğru sütün sayısını gösterir)

Private Sub ComboBox1_Click()
TextBox1 = ComboBox1.Column(0)
TextBox2 = ComboBox1.Column(1)
TextBox3 = ComboBox1.Column(2)
End Sub

Text sayısını sen istediğin kadar artırabilirsin.
Yalnız bu seçtiğin 1 veri için geçerli.
Yani 850 seçtiğinde tüm 850 leri getirmez yalnız seçtiğin 850 nin satırındaki verileri alır.

Bu şekli bir dene işine yararsa değişiklik yapmaya geçebiliriz.

 

[Mustafa MUTLU]

Kardeş çıkacağım artık.
Bir cevap verirsen senin işini görmek için biraz daha zaman ayırabilirim.

 

[manly]

Kardeş çıkacağım artık.
Bir cevap verirsen senin işini görmek için biraz daha zaman ayırabilirim.

Kusura bakmayın elektriklerden dolayı net gitti...

Seçtiğim veri ile ilgili tüm satırları getirmesi lazım...

 

[manly]

İstediğim resimdeki gibi olması ve bu şekilde oluyorsa, değerlerde oynadığımda değişikliğin kaydedilmesini istiyorum.

 

[manly]

Yardımlarınızı bekliyorum....

 

[Mustafa MUTLU]

Bunu Bir dene
Listeden seçim yapıp
Üzerinde değişiklik yapabilirsin

 

[manly]

Hocam çok teşekkür ederim... Allah razı olsun...

Benim isteğim biraz zordu sanırım...

 

[Mustafa MUTLU]

Hocam çok teşekkür ederim... Allah razı olsun...

Benim isteğim biraz zordu sanırım...

Önemli olan en sağlıklı bir şekilde istediğini yapabilmen.
Bu yaptığımız İşini görüyormu ?..

 

[manly]

Hocam görüyor desem yalan olur...Çünkü 1000 civarında kayıt var...

Ekte gönderdiğim dosyada 2 comboboxla çağırma yolu olabilir mi?

 

[manly]

Yaptığım değişiklikler sonucunda tüm verileri getiremezsem de bir şeyler yapmaya çalıştım..

2 farklı sütunu 2 farklı comboboxla sorgulatarak verileri getirmeyi başardım. Sizden ricam yapılan değişikliklerin Kaydet butonuyla kaydedilmesi....ayrıca F sütunundaki stok numarasının son 4 hanesinin B sütununa aktarılmasını istiyorum...

 

[manly]

Sanırım başardım...