Hi
I am doing a powerpoint presentation with a combobox with options. I have written a code for adding and coloring the items in the combobox but i would also like to make these items bold. How do i do that?
My code looks accordingly:
Private Sub ComboBox1_DropButtonClick()
If ComboBox1.ListCount = 0 Then
ComboBox1.AddItem ""
ComboBox1.AddItem "Passed"
ComboBox1.AddItem "Not Passed"
ComboBox1.AddItem "Follow-Up"
ComboBox1.AddItem "blue"
End If
End Sub
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = 1 Then
ComboBox2.Style = Bold
ComboBox1.ForeColor = RGB(0, 150, 0)
ElseIf ComboBox1.ListIndex = 2 Then
ComboBox1.ForeColor = RGB(150, 0, 0)
ElseIf ComboBox1.ListIndex = 3 Then
ComboBox1.ForeColor = RGB(255, 200, 0)
ElseIf ComboBox1.ListIndex = 4 Then
ComboBox1.ForeColor = RGB(0, 0, 150)
End If
End Sub
Private Sub ComboBox2_Change()
End Sub
Thank you for your help