get heigh msforms combo box as aktiveX

get heigh msforms combo box as aktiveX

Hi
I have a problem to get the height in an AktiveX Combobox. I need the height to set the Font.Size of the Combobox because some boxes are on more pictures with a different size. I tried following Code on the Init function
Set combobox1 = obElem.AktiveX
With combobox1
.Font.Size = obelem.height
.Font = "Arial Black"
End With
But Vba halts and says "... doesn't support this method..."
Can anybody tell me how this could be working? Or is there another way to set it?
Thanks
Matthias

This is a migrated post! Originally posted on 11.02.2009 by user matthias.zoellner. Please be aware that information can be outdated.