excel - Excel中的列表框 - 如何确定没有选择

Question

我有一个 Excel 电子表格，其中 sheet1 上的列表框从 sheet2 上的命名组填充。此命名组中有 4 个条目。

我希望用户在执行其他任何操作之前从该列表框(1 列)中进行选择。我正在尝试编写代码以检查列表框中的有效选择，但是 TopIndex = 0 和 .Value、.Selection、.Selected 要么不起作用，要么返回 0，但 0 是第一个条目的索引列表框，所以就像我总是做出选择一样。

如果我检查 Listbox.value <> ""无论我是否进行选择，它都会返回 null。

我整晚都在互联网上搜索解决方案，但一直空手而归。

我被困住了。寻找建议。

Answer 1

您可能正在寻找这段代码

If ListBox1.ListIndex = -1 Then
    MsgBox "Nothing selected"
Else
    MsgBox "Selected: " & ListBox1.ListIndex
End If

Listindex如果在列表框中未选择任何内容，则等于 -1。否则，它是从 0 开始的选定元素的索引。

上面的代码适用于多选为假的列表框。

对于这段代码上带有“多选”的列表框可能会对您有所帮助

Dim i As Long

 For i = 0 To ListBox1.ListCount - 1
    If ListBox1.Selected(i) = True Then
        MsgBox "Selected: " & i
    End If
Next i