难以辨认的下拉列表的替代品？ Excel 2016答案

【问题标题】：Alternatives to Illegible Drop Down Lists? Excel 2016难以辨认的下拉列表的替代品？ Excel 2016
【发布时间】：2018-03-31 03:05:02
【问题描述】：

只是把它放在那里看看是否有人对此有解决方案。在投影仪上展示我的工作簿时，几乎不可能阅读下拉列表。漂亮的组合框解决方法在 excel 2016 中消失了。

谁有任何适合他们的替代方案？

【问题讨论】：

我怀疑这更像是一个超级用户的问题。他们会想知道“漂亮的组合框解决方法已经消失”是什么意思？组合框在 Excel 2016 中仍然存在。另外，是不是措辞太小或失焦或两者兼而有之？
@QHarr 显然，在 Office 2013 及更早版本中，您可以选择更改组合框中的字体大小。该功能在 2016 年被删除。所以现在，当您使用组合框来尝试解决数据验证下拉菜单太小而无法阅读时，您会遇到同样的问题。
您使用的是什么办公室订阅？这是 Mac 还是 Windows？
@QHarr Office 365 和 Windows。

标签： excel

【解决方案1】：

在我的 Office 版本（MS Professional Plus 2016，Windows）中，我可以：

Option Explicit

Sub AddComboFont()

    Dim cb As ComboBox

    With ActiveSheet

        Set cb = .OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, _
                                 DisplayAsIcon:=False, Left:=322.5, Top:=11.5, Width:=176.5, Height:= _
                                 61.5).Object

        cb.Font.Size = 20

    End With

End Sub

同样的事情可以通过右击组合框>属性>字体来实现

这适用于ActiveX 组合框。您无法更改 Form control 组合框上的字体大小。这可能是一个折衷，因为表单控件可以比 ActiveX 表现得更好，特别是当用户具有不同的屏幕分辨率时。在这里查看我的答案Excel Comboboxes double up on some PCs

【讨论】：

我告诉你，我不能这样做。对于许多其他人来说，他们也做不到。您的版本如何在属性中提供字体选项？
这是我想要确定的。你能用代码设置字体吗？通过引用您的组合框，然后执行 .Font.Size?
我只是尝试使用上面的代码，但也没有用。有没有办法在组合框中添加代码来更改字体？
您是否将其放入标准代码模块并在选择工作表的情况下运行？它应该向该工作表添加一个组合框或给您一个错误。真的什么都没发生吗？
您不能更改表单控件组合上的字体，但应该可以在 ActiveX 上更改。您应该能够手动添加一个activex组合框并右键单击属性>字体>设置您想要的字体大小