VBA Excel - 在过滤的行中使用偏移量

问题描述

我正在删除多张工作表中的一行。我只是想问一下我的代码有什么问题吗？所以，在我进行删除部分之前，我首先检查我要删除的数据是否就是将要选择的数据。因此，我试图将颜色放在过滤表中的第一个结果中，但不幸的是，它为我的表中的第一个数据而不是过滤表中的第一个数据着色。

Sub del_stud()

    Dim LRN As String,ws As Worksheet
    
    LRN = ThisWorkbook.Sheets("HOME").Range("K11").Value
    
    For Each ws In Sheets(Array("STUDENTS_INFO","G1-Q1","G1-Q2"))
    
            With ws.Cells(8,3)
                .AutoFilter Field:=2,Criteria1:=LRN
                '.Offset(1).EntireRow.Delete
                .Offset(1).EntireRow.Interior.ColorIndex = 3
            End With
   
     Next ws
     
End Sub

这是我的工作表的视觉效果

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excel excel