更改数据validation下拉列表的宽度

在我的工作簿中，合并单元格AR8：AS8，并在单元格中显示数据validation下拉列表。 列表的来源使用公式=间接（GG8），这是指在不同的选项卡中的列表。

我的问题是，当我点击下拉框时，框不足以显示完整的项目。

有什么方法可以改变这个吗？ 如果可能，我宁愿不要使用VBA。

我期待着你的回应:)

Answer 1

没有可能的方法来实现这个W / O VBA。 如果你想使用VBA解决scheme，那么请find下面的代码。 您必须将此代码粘贴到Worksheet module ，而不是Regular module ，并根据评论进行调整。

 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Target.Address = "$H$1" Then 'adjust this range to your drop down list Target.Columns.ColumnWidth = 30 'adjust to your needs Else Columns(8).ColumnWidth = 8 'adjust column number to column with drop down values End If End Sub 

未select下拉菜单时：

已select下拉菜单：