Soru listbox

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,539
Excel Vers. ve Dili
2021 LTSC TR
Altın Üyelik Bitiş Tarihi
18-06-2026
4. satır 5. sütunda
hangi hücreye seçilirse seçilen hücreye listboxta seçilen değeri aktarmak istiyorum.
yardımcı olabilirmisiniz
 

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,539
Excel Vers. ve Dili
2021 LTSC TR
Altın Üyelik Bitiş Tarihi
18-06-2026
Kod:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
ActiveCell.Value = ListBox1.List(ListBox1.ListIndex, 0)
End Sub
konu çözüldü
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,524
Excel Vers. ve Dili
Office 365 Türkçe
Şu şekilde olabilir..

Kod:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    MsgBox ListBox1.ListIndex + 1
End Sub
 
Katılım
11 Ocak 2020
Mesajlar
20
Excel Vers. ve Dili
2007
Private Sub ListBox3_Click()
[Sabitler!G1] = ListBox3.ListIndex + 1
End Sub
Bu şekil çözdüm fakat TextBox da filtre yapınca en üste kayan ürünü 1. sıra olarak görüyo bu da yanlış verilerin gelmesine neden oluyo.Listbox F1:F100 hücreleri listeliyor bu listede kaçıncı olduğunu bulsam olay çözülecek gibi.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
43,521
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Merhaba,

Aşağıdaki linkte benzer bir konu açmıştınız. Orada bir önerim olmuştu. Fakat hata veriyor demiştiniz.


Dosyanızı harici linklere yükleyip paylaşırsanız daha net cevaplar alabilirsiniz.
 
Katılım
11 Ocak 2020
Mesajlar
20
Excel Vers. ve Dili
2007
Merhaba,

Aşağıdaki linkte benzer bir konu açmıştınız. Orada bir önerim olmuştu. Fakat hata veriyor demiştiniz.


Dosyanızı harici linklere yükleyip paylaşırsanız daha net cevaplar alabilirsiniz.
Halen daha bu duruma cevap aramaktayım işte Korhan bey :)
 
Katılım
11 Ocak 2020
Mesajlar
20
Excel Vers. ve Dili
2007
Dosya gönderin demiştiniz ama nasıl gönderildiğini bir türlü buşamadım.
 
Üst