删除从1到p的多行

Question

我正在尝试删除从2到p的多行。

通常，如果要删除2到1234行，请执行以下操作：

Rows("2:1234").EntireRow.Delete

所以我想我应该尝试一下：

dim p as long,
p = (Range("N2").Value)
Rows("2:p").EntireRow.Delete

但我有一个错误。 （类型不匹配）

任何人都知道该怎么做？

当然我也可以这样删除行

for i = 2 to p 
    Rows(2).EntireRow.Delete
next i

但我认为这需要更多时间 - 告诉我，如果我错了。

Answer 1

p是一个变量。当你把它放在引号内时，它被视为一个字符串。这是你在尝试什么？

Dim p As Long
p = Range("N2").Value
Rows("2:" & p).EntireRow.Delete