Цель этого кода - выполнить итерацию по столбцу в sheet1
и проверить, соответствует ли каждое значение значениям в строке в sheet2
. Если значение соответствует, копировать 5 строки информации из sheet2
к sheet1
в конкретной строке она в этот момент времени.
Проблемы:
- Ошибка 1004 в первой строке, где находится оператор if.
- Я думаю, что
Next b
также будет выдавать ошибку
Код VBA:
For i = 8 To 17
For b = 7 To 21
If Sheets("Sheet1").Range(i, 2).Value = Sheets("Sheet2").Range(b, 1).Value Then
Sheets("Sheet2").Range("b,1:b,7").Copy Sheets("Sheet1").Range(i, 6)
Next b
End If
Next i