VBA INDEX MATCH LOOP

如何在VBA中循环索引匹配function?

目前我的索引匹配工作正常 – 我现在需要通过“Table2”中的所有行循环查找“table1”中的匹配值

每次运行内置到工作簿中的查询时,表1“N”和“I”的填充行的数量都会更改。 在运行while while循环时,我总是收到语法错误(我对VBA相当陌生)

请帮忙!

谢谢,

total = Application.WorksheetFunction.Index(Sheets("table1").Range("I16:I100"), Application.WorksheetFunction.Match(Sheets("Table2") _ .Range("B2"), Sheets("table1").Range("N16:N100"), 0)) 

这样的事情呢?

 Dim rng As Range, cell As Range 'initialize the Range object rng with Range("A1:A10") Set rng = Range("A1:A10") 'Or if you prefer: Set rng = Selection 'Add the For Each Next loop. For Each cell In rng 'Do stuff Next cell