我想从A3开始获取A列中非空行的数量。我该怎么做?
我尝试过:
Dim row as integer
row = Sheets("Part2").Cells(Rows.Count, 1).End(xlUp).row
但是它会计算columnA中的所有行。希望它从A3开始。
需要一些指导。
答案 0 :(得分:0)
对于从A3
开始计算非空单元格,请使用此单元格:
Dim cntRows As Long
With Sheets("Part2")
cntRows = WorksheetFunction.CountA(.Range("A:A")) - WorksheetFunction.CountA(.Range("A1:A2"))
End With
另请注意,我Long
使用cntRows
类型(因为Integer
的最大值仅为32768
)
答案 1 :(得分:0)
Range("a3:a" & Rows.Count).SpecialCells(xlCellTypeConstants).Count
我使用Range("a3:a" & Rows.Count).SpecialCells(xlCellTypeBlanks).Count
尝试了另一个公式,确定它是最好的路径,但奇怪的是这给了我一个错误......