VBA找到並刪除了這壹行！

打開excel的菜單，開發工具並設計模式切換；根據圖1在ActiveX控件中添加ListBox控件對象。填寫ListFillRange中要連接的A列的單元格；雙擊添加的控件列表框1，進入VBA代碼編輯窗口添加如下代碼，如圖2所示。

private Sub listbox 1 _ DblClick（ByVal Cancel As ms forms。ReturnBoolean）

行（ListBox1。ListIndex+1 & amp；“:“& amp列表框1。ListIndex + 1）。刪除班次:=xlUp

末端接頭

結束了。關閉剛剛打開的設計模式後，雙擊ListBox1中的內容可以隨時刪除單擊的內容行。圖3和圖4是雙擊前後的表格截圖。