ListBoxa Çift Tıklama ile TextBoxlara Veri Yazdırma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

VolkanCan

Merhaba, Userform üzerinde bulunan, Listbox ile sayfadan gelen veriler alınmaktadır.
Listbox içerisinde, satır ve verilere çift tıklama işlemi yapınca, Userform üzerinde ki Textboxlara veriler aktarılmaktadır.
Listbox üzerinde, Textbox ile süzme-filreleme işlemi yapılmaktadır.
Listbox içerisinde, süzme-filtreleme işlemi sadece personel adı üzerinden, yani bir sütundan süzme işlemi yapılmaktadır.
Süzme işlemi olmadan, Listbox içerisinde seçim yaptığınız satır (veri) çift tıklandığında, Textboxlara veriler aktarılıyor, bunda sorun yok.

Sorun, Textbox ile listbox içerisinden, süzme işlemi yapınca, sadece Listbox içerisinde seçtiğiniz satırı textboxlara aktarması için çift tıkladığınızda, seçilen satır ve veriyi değil, Listbox içerisinde, 1,2,3,4,5 inci satır ve verileri Textboxa aktarmaktadır. Yani, yanlış satır ve veriler Textboxa aktarılmaktadır.

Bu yanlışı düzeltemedim. Yardımcı olursanız memnun olurum. Ayrıca; kodları ekliyorum, kodlar üzerinden inceleyerek, yanlış ve sorun konusunda, kodlar üzerinden yardımcı olursanız memnun olurum. Teşekkür eder, saygılar sunarım.

Listbox Süzme İşlemi yapılan Textbox kodu :

Kod: 
İndirmek için giriş yapmanız gerekmektedir.
(23 satır)

Listbox Kodu :

Kod: 
İndirmek için giriş yapmanız gerekmektedir.
(37 satır)

UserForm_Initialize :

Kod: 
İndirmek için giriş yapmanız gerekmektedir.
(21 satır)
 
Bazı sayfaların kapatılmasını yasaklamak
Şartlı toplam alma farklı sutuna
Tarihe göre sırala Oylamaya göre sırala
@VolkanCan

Sadece kodları vererek çözüm ararsanız, kimsenin konuyla ilgileneceğini sanmıyorum açıkçası.
En azından akıldan geçen çözümün sorun içerip içermediğinin kontrol edilebilmesi bakımından örnek belge gerekir.

Örnek belge olmayınca, destek olacak kişiden,
sıfırdan bir belge açıp, en azından kodda adı geçen nesneleri içeren bir userform oluşturmasını ve
bunun üzerinden de çözüme ulaşıp, sorunsuz olduğunu gördükten sonra cevap yazmasını istemiş oluyorsunuz.
Kaldı ki, verilen cevabın, sizin sorunsuz dediğiniz hususlara ilişkin kodlarla etkileşim oluşturması da muhtemel.
Bence destek olmayı düşünecek forumdaştan, oldukça çok şey istemiş oluyorsunuz.

Tercih sizin ama örnek belge ekleyerek, forumdaşların belge üzerinden bakmasını sağlarsanız daha iyi olur.
 
Oyla 0 Olumsuz oyla
Hocam dosyayı eklemişsiniz ama birden fazla sayfanın olduğu bir çalışma ve sanırım siz sadece bir sayfayı eklemişsiniz.

UserForm açılmıyor, hangi işlem hangi aşamada yapılacak vs..
Bunları tespit etmek ve düzeltmek belki sıfırdan yapmaktan daha zor emin olun.

Ben mesela açtım bakayım, yardımcı olayım diye.
Daha form açılır açılmaz hataya düşünce vazgeçtim.

Ömer ağabeyin dediği husus tam olarak bu...

Yani en çok sizin faydanıza aslında.

Sağlıcakla...
 
Oyla 0 Olumsuz oyla
Hocam, haklısınız, önce kendim sorunu çözmek için çalışırken kod sayfasına fazladan kodlar eklemişim ve maalesef örnek dosyanın açılışında sorun yaşanmasına ve çalışan işlemin bozulmasına sebep olmuştur. Maalesef dosyanın yedeği yok, tekrar düzenlemem lazım. Sorun, yukarıda arz ettiğim listbox kodlarından kaynaklanan sorundur. Eğer, kodlar ve kodlamalar üzerinden incelenirse listbox içerisinde ki kodlama hatası olduğunu düşünüyorum ama bilgim sorunu çözmeye yetmiyor. Velhasıl, konuya vakıf yardımcı olacak forumdaş veya hocalarım olursa memnun olurum, olmazsa da ilgi ve alakanızdan dolayı çok teşekkür eder, saygılar sunarım.
 
Oyla 0 Olumsuz oyla
Şu anda pc'i kapattım.
Siz bence adım adım ne yapmak istediğinizi yazarsanız, yarın zamanımız dahilinde destek olmaya çalışırız.

Farklı arkadaşlarımızdan da destek gelmesi temennisiyle.

Saygı ve selamlar bizden de...
 
Oyla 0 Olumsuz oyla
UserForm'un kod bölümündeki ListBox1_DblClick kod blokunda,
XDsat = ..... şeklinde koyu vurguladığım satırı ekleyin, sonra da aynı kod blokundaki i + 2 'lerin hepsini XDsat olarak değiştirin.
Bu şekilde filtreleme yapıp deneyin bakalım.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(5 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst