Change the Font Size on a Combo Box

[jerryatrick]

Hi Guy's,

I was hoping you might be able to provide me with some code to change the font size on a combo box (appears very small..size 10).

If you could assist, I would be most appreciative.

Michael.

 

[saon]

are you using combobox on a user form?

if so try this code.

combobox1.font.size = 20 '(whatever you want)

 

[jerryatrick]

What if the combobox is not on a userform??

 

[Andrew Poulsom]

Like this:

ActiveSheet.OLEObjects("ComboBox1").Object.Font.Size = 12

 

[jc352]

How would this be done for all comboboxes and textboxes on a userform? I currently have the code below and it is changing everything. (labels, listboxes, frame labels, etc.) is there a way to limit this?

    For Each ComboBox In Me.Controls
        With ComboBox
            .FontSize = 10
            .Font.Bold = True
            On Error Resume Next
        End With
    Next ComboBox