用VBA返回A列最大值行数

laoau123 · 发表于 2016-8-20 22:07

用VBA返回A列最大值行数

七彩屋 · 发表于 2016-8-21 16:46

Sub 最大值行数()
Range("D1") = Cells.Find(Application.WorksheetFunction.Max(Range("A1:A" & Range("a65536").End(xlUp).Row))).Row
End Sub

laoau123 · 发表于 2016-8-21 17:03

七彩屋发表于 2016-8-21 16:46
Sub 最大值行数()
Range("D1") = Cells.Find(Application.WorksheetFunction.Max(Range("A1:A" & Range("a ...

		自动登录	找回密码
密码			注册

[VBA] 用VBA返回A列最大值行数