作者:乔山办公网日期:
返回目录:excel表格制作
arr = Range("A1", [A65536].End(xlUp))
后面加个.value看看
arr = Range("A1", [A65536].End(xlUp)).value
n等于A65535单元格向上,最后一个非空的单元格的行号。
例如你这个表A列,除了A1、A5、A10有内容其余为空,N就为10
Dim qq As Long
qq = Intersect(ActiveSheet.UsedRange, Range("A:A")).Rows.Count + Intersect(ActiveSheet.UsedRange, Range("A:A")).Row - 1
For i = qq To 1 Step -1
If Len(Cells(i, 1).Text) > 0 Then
MsgBox "A列最copy后非百空度行问是:答" & i
Exit For
End If
Next i
应该是方法,不是属性。
后面有括号的
.Row()