☰

删除 Excel 中不继续的特定行

tag-icon • tag-icon microsoft-excel
删除 Excel 中不继续的特定行

我需要一些帮助来删除特定行，例如 Excel 中的第 31、62、124 行，一直到 3000+ 行，这是 31 的乘法。有人能帮我吗？我正在使用 excel 2016。

答案1

首先，您需要一个辅助列：

在辅助列的第一个单元格中输入此公式=MOD(ROW(),31)。将此公式填充到所有行。

在第 31、62、93 行等中，辅助列的值为 0。

进入过滤器，列的顶部会出现一个小三角形。单击辅助列中的三角形。

选择 0 并取消选择所有其他值。

现在表格显示仅有的行 31、62、39 等。选择这些行，右键单击并选择删除行。

再次转到过滤器并选择所有值就完成了。

答案2

看看这个简短的宏：

Sub Kill31()
    Dim N As Long, i As Long
    N = 9999
    For i = N To 1 Step -1
        If Cells(i, 1).Row Mod 31 = 0 Then
            Cells(i, 1).EntireRow.Delete
        End If
    Next i
End Sub

更换9999用你的数据底部并运行它（对于你的情况，4000 可能就可以了）

相关内容