How do I paste data to start at the top of my sheet

[Ben.Cgg]

Right now I am copying data from one sheet to another and works fine, But what it is doing is copying Row for Row. For example I am copying from xlWS_OB to xlWS_R using match a supplied date, so if data matches date say 10/23/2013 it will pull only that from whatever row, say 600 to 610 from xlWS_OB it will paste into xlWS_R 600 to 610, I need it to paste anything copied to the top of my sheet which in this case is row 12. my code below. Please help... Thanks so much

        For n = nR - 1 To nOB
        
                ' looks for date enter in Cell I7
            If xlWS_OB.Cells(n, 4).Value = xlWS_R.Range("I7").Value Then
            
                ' function to copy from OB Log to Recording Break Down
                xlWS_R.Cells(n + 1, 1) = xlWS_OB.Cells(n, 3)     ' time
                xlWS_R.Cells(n + 1, 2) = xlWS_OB.Cells(n, 8)     ' source id
                xlWS_R.Cells(n + 1, 3) = xlWS_OB.Cells(n, 10)    ' source type
            End If
        Next