(17/01/2020, 10:48)accessman yazdı: Hayırlı cumalar

Sub cmbFill(cmb As ComboBox, cIndex)
    Dim i As Long
    For i = 1 To databaseSheet.Range("A1000").End(xlUp).Row
        cmb.AddItem databaseSheet.Cells(i, cIndex)
        cmb.List(cmb.ListCount - 1, cIndex) = databaseSheet.Cells(i, cIndex + 1)
    Next i
End Sub

bu kod ile listeyi alabiliyoruz ama istediğim şu
alfabetik sıralanmış
filtrelenmiş
her elemanın bir kez listelendiği
şekilde liste nasıl alabilirz

excel bubble sort combobox

Yukarıdaki gibi aratırsanız oldukça fazla çözüm var.
Tabii dosya eklemek en mantıklısı.

Biz eklersek dosya önce bir combo ekleyeceğiz bu combonun adını değiştireceğiz.Sayfanın afını değiştireceğiz.

Sayfaya veriler gireceğiz.Bu veriler metinmi sayısalmı olacak bilemeyeceğiz sizin verilere göre.

Görüldüğü gibi bir sürü işlem