1 sayfadan 1. sayfa

listbox gruplandirma

İletiTarih: 15 May 2018 00:06
kamalak
manav elma
manav armut
manav karpuz
temizlik deterjan
temizlik toz
pastane tatli
pastane dondurma

burda benim istedigim mav tikladigimda list box ta elma armut gorunsun listbox

1. list manav temizlik pastane 2. listbox hangi sercem onun karsindaki gelsin.

Cevap: listbox gruplandirma

İletiTarih: 15 May 2018 04:10
feraz
Kod: Tümünü seç
Private Sub ListBox1_Click()

Dim aa As Range
ListBox2.Clear
    For Each aa In Range("A1:A7")
        If ListBox1.Value = aa.Value Then
            ListBox2.AddItem Cells(aa.Row, 2).Value
        End If
    Next

End Sub


Kod: Tümünü seç
Private Sub UserForm_Initialize()

For i = 1 To 7
    ListBox1.AddItem Cells(i, 1).Value
Next

End Sub