如果然后将单元格复制到新目标

Question

我正在尝试学习VBA，但坚持使用一段代码

我有一个数据集（包含标题），我需要遍历包含第5列中数据的所有行，如果值为250或更大，则将此单元格和第1列中的单元格复制到新工作表中A和B.

我当前的代码似乎粘贴了每个单元格，而不仅仅是那些值为250或更大的单元格

For i = 2 To LastRow
    'Check if DSLP is old
      If Cells(i, 1).Value >= 250 Then
            Cells(i, 1).Copy Destination:=RI.Cells(i, 1)
            Cells(i, 5).Copy Destination:=RI.Cells(i, 2)
      End If 'Account dslp is old
Next i