các bạn giúp mình về combo box và option button với (1 người xem)

[sang dz]

ở trên hình thì em đã dánh dấu 2 cai " Option button " và có 2 cái " combo box " ở dưới, em muon nhò các anh giúp là làm thế nào để khi click vào Option_putton_1 tức là cái mà có chữ " 2 cấp điện áp " thì 1 trong 2cái " combo box " bị mờ đi ( không thể tác dụng được vào ) còn khi click vào Option_putton_2 tức cái ghi 3 cấp điện áp thi cả hai " combo box " đều có thể sử dụng bình thường!!!!!!!!
cám ơn các anh trước nha!!!!!!!!

 

[khoavu87]

Cái này bạn có thể làm mờ đi bằng cách:

If OptionButton1.Value Then
ComboBox1.Enabled = True
ComboBox2.Enabled = False
Else
End If
''''''''''''Nghiên cứu tiếp nhé. nếu ko đưa file lên.

Do ko đưa file nên bạn tham khảo cái đó

 

[sang dz]

cám ơn bạn nhiều! bạn nói thế là được rùi! mình cố gắng tham khảo! nếu không được thì mình up file lên các bạn giúp nha

 

[sang dz]

àh anh bạn ơi! cho mình hỏi thêm phát nữa nhé, vẫn trên hình đấy. bạn có nhìn thấy cái ComboBox_5 cuối cùng mà có " D\DYo " đó. vẫn là chon một trong hai cái option Button vừa rùi nhưng vùng dữ liệu trên ComboBox_5 lại khác nhau.
VD:
giả sử khi Option Button_1 = true (Option Button_2 = False ) thì ComboBox có ListllRange = U3:U9 nhưng khi Option Button_2 = true (Option Button_1 = False ) thì ComboBox có ListllRange = q3:q9
vậy lúc này em phải làm thế nào?
mong anh giúp đỡ!!!!!!!!

 

[nghiaphuc]

àh anh bạn ơi! cho mình hỏi thêm phát nữa nhé, vẫn trên hình đấy. bạn có nhìn thấy cái ComboBox_5 cuối cùng mà có " D\DYo " đó. vẫn là chon một trong hai cái option Button vừa rùi nhưng vùng dữ liệu trên ComboBox_5 lại khác nhau.
VD:
giả sử khi Option Button_1 = true (Option Button_2 = False ) thì ComboBox có ListllRange = U3:U9 nhưng khi Option Button_2 = true (Option Button_1 = False ) thì ComboBox có ListllRange = q3:q9
vậy lúc này em phải làm thế nào?
mong anh giúp đỡ!!!!!!!!

Bạn có thể sử dụng 2 sub sau:

Private Sub OptionButton1_Click()
    ComboBox5.ListFillRange = "U3:U9"
    ComboBox5.ListIndex = -1
End Sub
Private Sub OptionButton2_Click()
    ComboBox5.ListFillRange = "Q3:Q9"
    ComboBox5.ListIndex = -1
End Sub

 

[sang dz]

Cảm ơn các bác nhiều nha!
Chúc các bác có một ngày vui vẻ