数确切的范围

是否有一个公式或方法保持精确数量的行（即总是100行）并在所述行内计数 – 无论是插入还是删除？我试过绝对的引用，但插入和删除影响它。

我现在唯一的方法是在完成所有插入和删除之后重写公式。

Sub ExactRowsCount() ' ' ExactRowsCount Macro ' Range("H1").Select ActiveCell.FormulaR1C1 = "=COUNTA(R[4]C:R[104]C)" Range("H2").Select End Sub

我会使用OFFSET ：

 =COUNTA(OFFSET(A1,4,0,100,1))

其中A1是您希望计数结束的单元格。如果您希望列高度依赖于另一个单元格，此公式可能会特别方便; 例如，如果要将列高度保留在单元格A2中而不是使用常数100，则可以执行以下操作：

 =COUNTA(OFFSET(H1, 4, 0, A2, 1))

无论是否插入和删除，这将返回A2到A101中非空白单元格的计数：

 =COUNTA(INDIRECT("A2:A101"))