如何自动不显示下拉菜单中的空白值

雯馨

如何自动不显示下拉菜单中的空白值

工作簿1.zip (10.87 KB, 下载次数: 13)

2021-9-30 14:59 上传

点击文件名下载附件
工作簿1.zip

半杯

花点时间处理一下数据验证的可选项，让数据源没有空值

阿通

用数据有效性要加辅助列，用combobox可以直接实现

Private Sub ComboBox1_GotFocus()
rng = Sheet1.Range("A65536").End(xlUp).Row
For i = 2 To rng
  If Range("A" & i) <> "" Then
  ComboBox1.AddItem (Range("A" & i).Value)
  End If
Next
End Sub

岳杨

我想通过自定义名称后，利用序列=INDIRECT($O5)设置二级菜单

东余夕阳下

我想通过自定义名称后，利用序列=INDIRECT($O5)设置二级菜单无空白值