如何获取查找到的值的左边单元格中的值？

hy760318 · 发表于 2022-12-3 00:43

在一个sheet中查找最大最小值，然后想要把这两个值分别对应的左边单元格的值找出来，并显示。应该如何获取？

Dim aMax As Variant, aMin As Variant
aMax = Sheet12.Range("U5:u" & Range("U65536").End(xlUp).Row)
aMin = Sheet12.Range("U5:u" & Range("U65536").End(xlUp).Row)

蓝桥玄霜 · 发表于 2022-12-3 10:57

Dim r1,zb
Set r1= Sheet12.Range("U5:u" & Range("U65536").End(xlUp).Row).Find(aMax,,,1)
zb=r1.offset(0,-1).value

hy760318 · 发表于 2022-12-3 12:59

蓝桥玄霜发表于 2022-12-3 10:57
Dim r1,zb
Set r1= Sheet12.Range("U5:u" & Range("U65536").End(xlUp).Row).Find(aMax,,,1)
zb=r1.offse ...

这个不行，无效的过程调用

蓝桥玄霜 · 发表于 2022-12-4 09:55

hy760318 发表于 2022-12-3 12:59
这个不行，无效的过程调用

这几句代码放在你的代码的后面一起用的。
建议上传Excel表格附件来说明问题。

MOY838840554 · 发表于 2022-12-4 10:48

你那样怎么能获取最大值和最小值？？？不应该用min和max函数吗

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