VBA Arr = .Range("A1:C" & .[A65536].End(xlUp).Row) 相关知识点: 试题来源: 解析 [A65536].End(xlUp).Row 返回A列数据的最后一行的行号 [A65536].End(xlUp)相当于 选中A65536 然后按 End 再按 上 Arr= 就是给Arr赋值 那么也就是把A列到C列的数据赋值给Arr 分析总结。 那么也就是把a列...
答案解析 查看更多优质解析 解答一 举报 [A65536].End(xlUp).Row返回A列数据的最后一行的行号[A65536].End(xlUp)相当于 选中A65536 然后按 End 再按 上Arr=就是给Arr赋值那么也就是把A列到C列的数据赋值给Arr 解析看不懂?免费查看同类题视频解析查看解答 ...
1 1、第一种方法: ActiveSheet.Range("A" & Rows.Count).End (xlUp).Row2、第二种方法:ActiveSheet.Range("a1048576").End(xlUp).Row如果是低版本的OFFICE用ActiveSheet.Range("a65536").End(xlUp).Row3、第三种方法:ActiveSheet.Cells(Rows.Count,1).End(3).Row4、第四种方法:ActiveSheet.range("A1...
则得到表的最后一行65536,容易出错,建议使用Range("a65536").End(xlUp).RowSub a()Dim i As Long...
1. 首先,打开Excel,点击“开发”选项卡,然后点击“Visual Basic”按钮,打开VBA编辑器。 2. 在VBA编辑器中,编写以下代码:为了简化代码,我们可以把网友的问题要求稍微就能通一下,他所说的“第3位”、“第1位”,我们可以把其中的分隔符:“.",算上一位数,那么代码里就可以做出相应的调整,能达到同样的效果。
如果是第一个range出错 i = Sheets("模特衣架库存表").Range("a65536").End(xlUp).Row 改成 i = Sheets("模特衣架库存表").Range("A65536").End(xlUp).Row 如果是第二个range出错 可能是Range("A & i:C200")不对,试试range(cells(i,1),cells(200,3))如果还不能解决,可能是没有...
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列最后非空行是:" & i Exit For End If Next i Dim...
office 中有函数 rra=range("a65536").end(xlup).row 可以做到这个效果吗?就是得到本列的最大活动单元格,主要只是单纯的自带函数,不要用Function 因为我那个电脑不支持vba,只支持函数,谢谢了!tjuet9429 采纳率:59% 等级:9 已帮助:766人 私信TA向TA提问 ...
Range("a65536").End(3)代表从A65536单元格往前查找到的第一个有数据的单元格Range("a65536").End(3).Row表示A列单元格最下面一个有数据的单元格的行号,假定最后使用的单元格行号为20,则"a1:a"与后面的连起来就表示"a1:a20"这些单元格。End(3)这个3代表常量xlup,表示向上搜索。整句表示对A列有数据的单...
End With 2、如何获取指定列的列标(即如A、B、C、AA等表示) 利用chr函数可以实现A至Z的列标转换,但对于第27列以后的列标就没法转换了,代码如下: Sub 获取指定列的字母() Dim i As Integer, arr() As String Debug.Print Cells(1, 27).Address ...