无效的下一个控件变量参考

时间:2016-03-01 15:57:21

标签: vba excel-vba loops next excel

编辑我的代码后,我得到一个无效的下一个控件变量引用。是否有人能够解释导致此问题的原因?我的循环顺序的原因是因为我想首先检查一行的所有列,然后在寻找新匹配之前全部移动到新行

Sub Macro1()
'
' Loops through data and finds matches and then indexs information
'
Dim J As Integer
Dim P As Integer
Dim v As Integer
IRowL = Cells(Rows.Count, 1).End(xlup).Row

Dim sht As Worksheet
Set Master = Sheets("Master")

For J = 1 To IRowL
    For v = 21 To IRowL
        For P = 1 To IRowL

           If cell.value(j,11)= Master.cell.value(p,1) and Cell.value(j,10) = Master.cell.value(p,v) then



              cell.Value(j, 30) = Master.cell.Value(p, 7)
              cell.Value(j, 31) = Master.cell.Value(p, 8)

           Else
           End If
        Next p
    Next v
Next J

'
End Sub

Starting point

the information i want to grab

我想从第B栏(第二张图片)中获取信息,以及日期与第一张图片中的第K列匹配的列名称。

1 个答案:

答案 0 :(得分:1)

下一个v和下一个P是错误的行,这是错误告诉你的。运行Next P时,您已经不在P循环中了。

尝试倒转线条,它应该运行。

如果您遇到某些特定问题,请明确混合使用' Next'陈述,你能解释一下吗?有更清晰的方法来做这样的事情。