Çift Tıklama İle ListBox Kapama

[ozbinici07]

Merhaba Arkadaşlar

ListBox Üzerinden Seçtiğim Veriye Çift Tıkladığımda Listbox'un Kapanmasını İstiyorum Yani (X) Yaptığı Görevi Yapmasını İstiyorum.

Not: İstediğim Kod Bu Değil Çünkü Bu Kod Kapatmıyor Gizliyor Gizlemeside Sıkıntı Yapıyor tam olarak (X) tuşunun görevini görmüyor.

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Me.Hide
End Sub

Yardımlarınız İçin Şimdiden Teşekkür Ederim.

 

[Ömer BARAN]

Merhaba.

....Visible=False

şeklinde denediniz mi acaba?
Tabi ListBox'u tekrar görünür kılmak için userformdaki başka bir nesneye ait kodlarda düzenleme yaptığınızı varsayıyorum.
.

 

[Orion1]

Deneyiniz.

Unload me

 

[ozbinici07]

@Ömer BARAN ve @Orion1 Teşekkür Ederim Yardımlarınız İçin Fakat (Visible=False) Kodu İşe Yaramadı (Unload me) koduda komple kapatıyor userformu.

 

[Ömer BARAN]

Soru, örnek belge üzerinden sorulmayınca, sonuca ulaşılması her zaman zor oluyor.
Çünkü ister istemez varsayımlardan hareket edilmesi gerekiyor, bir anlamda fal bakılıyor.

Sorunuzu; örnek belge üzerinde açıklamalar yazarak ve mevcut userform kodları dosya içerisinde ve
çalışır durumda olacak şekilde örnek belge üzerinden sormanızda yarar var.
.

 

[Orion1]

@Ömer BARAN ve @Orion1 Teşekkür Ederim Yardımlarınız İçin Fakat (Visible=False) Kodu İşe Yaramadı (Unload me) koduda komple kapatıyor userformu.

ListBox Üzerinden Seçtiğim Veriye Çift Tıkladığımda Listbox'un Kapanmasını İstiyorum Yani (X) Yaptığı Görevi Yapmasını İstiyorum.

Unload me (X) kapatma işlevi görüyor.

 

[Korhan Ayhan]

Merhaba,

Listbox nesnesi kapanmaz. Sadece gizlenebilir. Evren beyin önerdiği kod ise userformu tamamen kapatır.

Formunuzun üzerine bir buton ekleyin ve aşağıdaki kodu uygulayın.

Private Sub CommandButton1_Click()
    Me.ListBox1.Visible = False
End Sub

 

[ozbinici07]

@Korhan AYHAN ve Diğer Yardımcı olan kişilere çok teşekkür ederim. Korhan bey'in göndermiş olduğu kod çalışıyor.

 

[Ömer BARAN]

..........Visible=False
şeklinde denediniz mi acaba?
Tabi ListBox'u tekrar görünür kılmak için userformdaki başka bir nesneye ait kodlarda düzenleme yaptığınızı varsayıyorum.
.

@Ömer BARAN...Teşekkür Ederim Yardımlarınız İçin Fakat (Visible=False) Kodu İşe Yaramadı......

....Listbox nesnesi kapanmaz. Sadece gizlenebilir..........

[COLOR="red"]Me.ListBox1.Visible = False[/COLOR]

Korhan bey'in göndermiş olduğu kod çalışıyor.

Merhaba.
Demekki; ....Visible=False kod'u işe yarıyormuş.

Ben ListBox'un çift tıklama kodlarında;
-- önce çift tıklama ile ilgili aktarma vs. kodları,
-- ardından da ....ListBox...Visible=False kod satırı eklemeniz
için cevap yazmıştım ve başka bir nesnenin kodlarında da Listbox'u tekrar görünür kılmaya yönelik
düzenleme yapmanız gerektiğini hatırlatmıştım.

İlginç.
.