• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Combobox temizleme

Katılım
2 Mayıs 2006
Mesajlar
237
Elimde 2 adet userform var bunlardan 2.userformdan 1.userformda bulunan bazılarını(6'dan 33 kadar olan) comboboxları temizlemek istiyorum.Bunun için formüle ihtiyacım var.Yardımlarınız için tşk ederim şimdiden.
 
Merhaba,

Bu şekilde deneyin.

Kod:
Private Sub Temizle()
    
    Dim i As Byte
    
    For i = 6 To 33
        Controls("Combobox" & i) = ""
    Next i
    
End Sub


.
 
Ekteki kodları denermisiniz.

Kod:
Private Sub CommandButton1_Click()
For i = 6 To 33
UserForm1.Controls("ComboBox" & i).Clear
Next i
End Sub
 
Sorun halledildi ikinizin formülünü birleştirdim.İkinize de teşe ederim.
 
Geri
Üst