运行时错误424,定义变量的问题

时间:2016-03-01 19:01:14

标签: vba loops variables runtime-error

我在解决下一个变量问题后遇到了麻烦。我现在得到运行时错误424.我相信这是因为我没有正确地将我的变量命名为字符串或整数。我有两种方法代码,它们都导致相同的错误。

第11列和第1列是需要匹配的文本 第10列和第(v)列是需要匹配的日期 第2列将是末尾带有数字的文本 列(V)将是一个末尾有数字的数字

循环的逻辑对我有意义,但无法弄清楚是什么导致了这个问题。

如果cell.Value(J,11)= Master.cell.Value(P,1)和cell.Value(J,10)= Master.cell.Value(P,V)那么

错误在这里生成“运行时间'424'对象是否必需,我缺少什么对象?(粗体错误)

  Sub IndexInfo()
'
' Loops through data and finds matches and then indexs information
'
Dim J As Integer
Dim P As Integer
Dim V As Integer
Dim Master As Worksheet
Dim Gracie As Worksheet

IRowL = Cells(Rows.Count, 1).End(xlUp).Row
Set Master = Worksheets("Master")
Set Gracie = Worksheets("Gracie")


For J = 2 To IRowL
    For V = 21 To 50
        For P = 2 To IRowL



If Gracie.Cells(J, 11).Value = Master.Cells(P, 1).Value And Gracie.Cells.Value(J, 10) = Master.Cells(P, V).Values Then

Gracie.Cells(J, 30).Value = Master.Cells(P, 2).Value And Gracie.Cells(J, 31).Value = Master.Cells(1, V).Value

            Else
        End If
     Next P
   Next V
Next J

End Sub

0 个答案:

没有答案