koşullu combobox

[EMRE ÞAHAN]

slm arkadaşlar.
ekte bulunan çalışmada,

cbocins1 combobox'ında RENKLİ seçilirse;
cborenk1 combobox'ın RowSource= "veri!E2:E10" olsun

cbocins1 combobox'ında ALDECOR seçilirse;
cborenk1 combobox'ın RowSource= "veri!G2:G10" olsun

teşekkürler..

 

[excelman]

Private Sub cbocins1_Change()
If cbocins1.Value = "RENKLİ" Then
cborenk1.RowSource = "veri!E2:E10"
End If
If cbocins1.Value = "ALDECOR" Then
cborenk1.RowSource = "veri!G2:G10"
End If
End Sub

USERFORM UN İNİTİALİZE bölümünden
aşağıdaki kodunuzu silin.

If cbocins1.Value = "RENKLİ" Then
cborenk1.RowSource = "veri!E2:E10"
End If

Kolay Gelsin.

 

[EMRE ÞAHAN]

teşekkürler...