Comboboxa hücrenin durumuna göre veri çekmek

[busraakrky]

Merhabalar siparişler sayfamda siparişin açık ya da kapalı olma durumuna göre comboboxa yazmasını istiyorum.Sayfamda sipariş numarası (A hücresi) ve sipariş durumu (I hücresi) var.İstediğim şey comboboxa sipariş durumu açık olan sipariş numaralarını çekmek. Yardımcı olursanız çok sevinirim.

 

[Ömer]

Merhaba,

Örneği kendinize göre düzenlersiniz.

Private Sub UserForm_Initialize()
    
    Dim i As Long, Ss As Worksheet
    
    Set Ss = Sheets("siparişler")
    
    For i = 2 To Ss.Cells(Rows.Count, "A").End(xlUp).Row
        If UCase(Replace(Replace(Ss.Cells(i, "I"), "ı", "I"), "i", "İ")) = "AÇIK" Then
            ComboBox1.AddItem Ss.Cells(i, "A")
        End If
    Next i
    
End Sub

 

[hmtstc]

merhaba,

dosyada istediğiniz hazırdır,

combobox_guncelleme.xlsm dosyasını indir - download

combobox_guncelleme.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

www.dosya.tc

 

[busraakrky]

Çok teşekkür ederim zihninize ve ellerinize sağlık.