Hi can anyone tell me where I am going wrong with this code. I am trying to make it begin copying rows after it finds "CRS" and continue until it gets to "Other".
Instead of copying the entire rows however I would like it to start in column EO.

Thanks for any help! 

 
Sub Test()
'
' PullData1 Macro
' Use to pull data

   Dim BK_Start As Boolean

    Set xs = Sheets("Unix")  'Source
    Set xt = Sheets("Demonstration") 'target

    FinalRow = xt.Cells(Rows.Count, 1).End(xlUp).Row
    BL_Start = False

    For i = 6 To FinalRow
       If xs.Cells(i, 1).Value = "CSR" Then BL_Start = True
       If xs.Cells(i, 1).Value = "OTHER" Then BL_Start = False

        If BL_Start = True Then
            xt.Cells(i, 4).FormulaR1C1 = "=Unix!R[21]C[141]"
            xt.Cells(i, 4).AutoFill Destination:=xt.Cells(i, 4).Range("A1:CF1"), Type:= _
            xlFillDefault
        End If
       
    Next i

    Set xs = Nothing
    Set xt = Nothing
End Sub