VBA INDEX MATCH LOOP

Question

如何在VBA中循环索引匹配功能？

目前我的索引匹配工作正常 - 我现在需要循环遍历“Table2”中的所有行，并在“table1”中找到匹配的值

表1的填充行数，“N”和“每次运行内置于工作簿中的查询时，“我”都会更改。我在运行for和while循环时遇到语法错误（我对VBA来说还不熟悉）

请帮忙！

谢谢，

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

Answer 1

这样的事情怎么样？

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