Excel VBA中的索引/匹配循环

Excel VBA中的索引/匹配循环,excel,vba,match,Excel,Vba,Match,我试图将索引/匹配Excel公式转换为VBA,但不知何故,它不起作用 我有两张床单。一种称为“排除包括”,另一种称为“PCAM承诺”。 “ExcludeInclude”表如下所示: “PCAM承诺”表如下所示: 基本上,我所要做的就是匹配Exclude/Include值。例如,“SO045828757”在“ExcludeInclude”表上显示为“Exclude”。我需要在“PCAM承诺”表的G列中显示排除/包括值(使用循环/索引/匹配的组合) 此excel公式将完成以下工作: =INDEX

我试图将索引/匹配Excel公式转换为VBA,但不知何故,它不起作用

我有两张床单。一种称为“排除包括”,另一种称为“PCAM承诺”。 “ExcludeInclude”表如下所示:

“PCAM承诺”表如下所示:

基本上,我所要做的就是匹配Exclude/Include值。例如,“SO045828757”在“ExcludeInclude”表上显示为“Exclude”。我需要在“PCAM承诺”表的G列中显示排除/包括值(使用循环/索引/匹配的组合)

此excel公式将完成以下工作:

=INDEX(ExcludeInclude!$B$2:$C$136, MATCH('PCAM Commitments'!A2,ExcludeInclude!$B$2:$B$136,0),2)
但是我需要把这个公式转换成VBA

这就是我所拥有的”

但它不工作,每当我尝试运行它时,就会弹出一个错误消息框,说“Object Variable或With Block Variable not set”


感谢您的帮助!谢谢!

您需要
Set
对象变量:
Set lookRange=…
Set StartRange=…
。哇,谢谢!问题解决了!您需要
Set
对象变量:
Set lookRange=…
Set StartRange=…
。哇,谢谢!问题解决了!
Set lookRange = Sheets("ExcludeInclude").Range("B2:C136")
Set StartRange = Sheets("ExcludeInclude").Range("B2:B136")
Set lookRange = Sheets("ExcludeInclude").Range("B2:C136")
Set StartRange = Sheets("ExcludeInclude").Range("B2:B136")