Ошибка выполнения VBA 1004 при копировании вставки из листа на другой
Я пытаюсь скопировать только значения из одного листа в другой в той же книге, но всегда получаю сообщение об ошибке.
Вот код:
For Each turn In test.Range("A6:" & test.Range("A6").End(xlDown).Address)
For i = LastRow To 2 Step -1
If CDate(i1.Range("B" & i).Value) > CDate(turn.Value) Then
'i1.Rows(i).Delete
End If
Next i
turn.Offset(, 1).Copy
Sheets("PRONO").Range("B8").Select
Selection.PasteSpecial xlPasteValues
' turn.Offset(, 2).Select
' Selection.Copy
' prono.Range("B9").Select
' Selection.PasteSpecial xlPasteValues
Application.CutCopyMode = False
Next