改成
Cells(j, 5) = ApplicationWorksheetFunctionVLookup(Cells(j, 3), wbSheets(1)Range("B1:D500"), 3, 0)
要输出啥结果啊?
For i = 2 To 200
With i
End With
Next i
With i 这个是不需要的。
楼上说得都很对,按F8键一步一步调试看看吧。这是VBA编程的必经之路啊
以上就是关于VBA程序调试过程中关于vlookup的语句不能正常运行全部的内容,包括:VBA程序调试过程中关于vlookup的语句不能正常运行、vba求助,帮我看看下面的程序怎么调试,谢了!、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)