Question

EXCEL表单控件组合框

请问在EXCEL表单控件组合框中如何修改字体？字小的要死，我都瞅不见了要。
注意是表单控件不是ACTIVEX控件哦

Answer 1

Dim ex As Object
Dim exwbook As Object
Dim exsheet As Object
pp = 1
Set ex = CreateObject("Excel.Application")
Set exwbook = Nothing
Set exsheet = Nothing
Set exwbook = ex.WorkBooks().Add
'-----------------------------------------------------
ex.Visible = True
ex.Selection.Font.Size = 24 '设置字体大小
ex.cells.EntireColumn.AutoFit '自动调整列宽
ex.ActiveSheet.PageSetup.PrintGridLines = True '网格线

'ex.ActiveSheet.Columns [1].ColumnWidth = 5 '设置指定列的宽度（单位：字符个数）'
'ex.ActiveSheet.Rows [2].RowHeight = 2 / 0.035 '设置指定行的高度（单位：磅）（1磅＝0.035厘米）

'ex.WorkSheets(1).Rows(8).PageBreak = 1 '在第8行之前插入分页符：

ex.ActiveSheet.PageSetup.TopMargin = 5 / 0.035 '顶边距5cm:
ex.ActiveSheet.PageSetup.BottomMargin = 1# / 0.035
ex.ActiveSheet.PageSetup.LeftMargin = 3 / 0.035
ex.ActiveSheet.PageSetup.RightMargin = 1# / 0.035

Answer 2

如果你说的是ComboBox这个控件，EXCEL里的VB控件工具栏里的属性可以改，和VB里的属性窗口是一个意思，你找找吧！