Caption của OptionButton đổi màu khi click vào

[Duong gia]

Trên UserForm có 3 OptionButton1, 2, 3 khi ta click chọn OptionButton nào thì caption của OptionButton đó chuyển màu xanh. Các Bác giúp với. Thanks

 

[SoiBien]

ví dụ nhé

[color=darkblue]Private[/color] [color=darkblue]Sub[/color] OptionButton1_Click()
    OptionButton1.ForeColor = &HFF0000
    OptionButton2.ForeColor = &H0&
    OptionButton3.ForeColor = &H0&
[color=darkblue]End[/color] [color=darkblue]Sub[/color]