Dim x&,r&,k&,i& r = Range("G65536").End(xlUp).Row For x = 2

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/14 11:55:20

Dim x&,r&,k&,i& r = Range("G65536").End(xlUp).Row For x = 2 To r

Dim x&,r&,k&,i& ‘这行肯定没问题,是定义四个变量
r = Range("G65536").End(xlUp).Row’关键是这行：
"G65536"——是G列的最后一个单元格,Excel行的极限是65536
End(xlUp)——相当于按下Ctrl键和向上键,其含义是从 Range("G65536")单元格向上找,找到第一个不为空的单元格,这个单元格的行号就下面的：
Row 所找到的第一个不空的行号.
For x = 2 To r　'从第2行循环到r行.
　　　张志晨奉献

Dim x&,r&,k&,i& r = Range("G65536").End(xlUp).Row For x = 2 VBA Arr = .Range("A1:C" & .[A65536].End(xlUp).Row) a = 2 To [a65536].End(xlUp).Row a = .[H65536].End(xlUp).Row 是什么意思在VBA中Range("a1").End(xlDown).Row和Range("a1").End(xlup).Row什么 n = Sheets(j).[a65536].End(xlUp).Row Range("E65536").End(xlUp). Dim a(9) As Integer,x As Integer,k As Integer,I As Integer R VB dim x as integer dim i as integer x = 100 for i = 1 to 10 [A65536].End(xlUp).row 中[A65536]是什么意思? x^2+(k+3i)x+4+k=0(k属于R)有实根的充要条件 Dim x(100), a For i = 1 To 100 x(i) = i Next i For Each a In