首页 > 解决方案 > 基于单元格值的删除行宏总是删除第一行

问题描述

我有一个 VBA 宏设置为根据单元格中提供的值删除一行。所以我写了一些应该过滤第二列以找到所需值并删除该行的东西。我的问题是,由于某种原因,无论如何它总是删除第一行,即使该值不存在于工作表中。

M2 是我想要在表格中找到的值的单元格。UnMerge 部分是因为它合并了一些单元格,而我的排序宏不适用于合并的单元格。

这是代码:

Private Sub DeleteCarte_Click()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("INDEX")
With ws.Range("A6.F600")
    .AutoFilter Field:=2, Criteria1:=Range("M2").Value
    .EntireRow.Delete
End With
Sheets("INDEX").Range("A1:F600").UnMerge
End Sub

标签: excelvba

解决方案


推荐阅读