我在解决下一个变量问题后遇到了麻烦。我现在得到运行时错误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