有没有办法使用 Delete 键从列表框中删除选定的项目？

Question

我想在按下 Delete 键时从列表框中删除选定的项目。实际上，在我的用户窗体中，我有一个列表框，它显示工作表中的数据，我有一个“删除”命令按钮，可以从工作表中删除整个匹配行，然后更新列表框。但我想使用键盘的物理 Delete 键做同样的事情。我在互联网上搜索了很多，但找不到任何东西。

Answer 1

试试这个

Private Sub ListBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    
    If KeyCode = 46 Then
        With Me.ListBox1
            If .ListIndex <> -1 Then
                If MsgBox("Delete current item?" & vbCrLf & .Value, vbYesNo + vbExclamation, "Delete entry") = vbYes Then
                    .RemoveItem (.ListIndex)
                End If
            End If
        End With
    End If
    
End Sub

有没有办法使用 Delete 键从列表框中删除选定的项目？

Is there any way to delete selected item from listbox using Delete key?

excel

vba

delete-row