Soru checkbox seçiliyse nesnedeki komutları işlevsiz yap

[zulfuernek]

Private Sub CheckBox5_Click()
On Error Resume Next
Me.ComboBox10.RowSource = Me.ComboBox9
Me.ComboBox9.RowSource = Me.ComboBox8
Me.ComboBox8.RowSource = Me.ComboBox7
Me.ComboBox7.RowSource = Me.ComboBox6
ComboBox6_DropButtonClick = False
ComboBox7_DropButtonClick = False
ComboBox8_DropButtonClick = False
ComboBox9_DropButtonClick = False
ComboBox10_DropButtonClick = False
End Sub

birbirinden bağımsız 5 adet combobox var. comboboxlardaki seçime göre listboxa veriler geliyor.

benim istediğim chackboxu tıkladığım zaman combobox_dropbuttonclick işlevlerini etkisiz hale getirmesi ve comboboxları birbirine bağlaması










End Sub

 

[Ömer BARAN]

Merhaba Sayın @zulfuernek .

Sorunuzdaki "combobox_dropbuttonclick işlevlerini etkisiz hale getirme" kısmı için,
ilgili dropbuttonclick kodlarının en başına If CeheckBox...= True Then Exit Sub gibi birer satır ekleyerek sonuç alabilirsiniz.

Ancak sorunuzdaki "comboboxları birbirine bağlaması" kısmı için,
hem daha evvel de belirttiğim gibi sorunuzu örnek belge üzerinden sormanızda, hem de biraz detay açıklama yapmanızda yarar var sanırım.
.

 

[zulfuernek]

@Ömer BARAN omer hocam ilginize tesekkir ederim. diger sorumu halledebilirim ben zaten konu basliginda onemli olan drop utton isleviydi. emeginize saglik