我想要运行vlookup。如果失败，我想将查找值增加1，然后再次运行vlookup。我想继续这个过程，直到vlookup成功。
我该怎么做？
我尝试使用一些循环和错误处理，但我是宏的新手，所以我还没有得到任何工作。
答案 0 :(得分：0)
也许这样的事情。
resources :information
我已添加dim findThis as long, maxThis as long, var as variant, result as variant
with worksheets("MyWorksheet")
maxThis = application.max(.columns("A"))
for findThis = (Date - 100) to maxThis step 1
var = application.match(findthis, .columns("A"), 0)
if not iserror(var) then exit for
next findthis
if findthis <= maxthis then
result = application.index(.columns("Z"), var)
'alternate
result = .Cells(var, "Z").value
debug.print result
end if
end with
通常不显示的位置（这是默认设置），因此如果您想逐周查看，您可以看到更改增量的位置。