Filter on date and paste to value destination

Help please, I have a spreadsheet with rows of data by date and category.
Date being in column c and categories in column v. I have code that currently filters on date and pastes into the desination spreadsheet just by selecting the last row of the destination spreadsheet. But...........What I need it to do is to find the matching category on the destination spreadsheet and paste the values under that category.
Here is my code. I was thinking vlookup or match somehow. I was using another spreadsheet that found the row number of the category and then counted all the rows that were being used in the category to find the last row to paste into the category but I am not sure if that would be of any help or if there might just be a simpler way. But here is what I have:

Sub Copybydate()

'Update categories by check date
Dim DestSheet As Worksheet
Dim NewRow As Integer

Set DestSheet = Worksheets("Itemized Costs2")
NewRow = Worksheets("Itemized Costs2").Range("C65536").End(xlUp).Row


Dim sRow As Long 'row index on source worksheet
Dim dRow As Long 'row index on destination worksheet
Dim MyArr As Variant


'Dim strsearch As String

MyArr = Array(UserForm2.ComboBox1.Value)


For I = LBound(MyArr) To UBound(MyArr)

For sRow = 1 To Range("C65536").End(xlUp).Row
If Cells(sRow, "C") Like MyArr(I) Then
dRow = NewRow + 1
NewRow = NewRow + 1

DestSheet.Cells(dRow, "B") = Cells(sRow, "B")
DestSheet.Cells(dRow, "C") = Cells(sRow, "C")
DestSheet.Cells(dRow, "D") = Cells(sRow, "D")
DestSheet.Cells(dRow, "E") = Cells(sRow, "E")
DestSheet.Cells(dRow, "F") = Cells(sRow, "F")
DestSheet.Cells(dRow, "G") = Cells(sRow, "G")
DestSheet.Cells(dRow, "H") = Cells(sRow, "H")
DestSheet.Cells(dRow, "I") = Cells(sRow, "I")
DestSheet.Cells(dRow, "J") = Cells(sRow, "J")
DestSheet.Cells(dRow, "K") = Cells(sRow, "K")
DestSheet.Cells(dRow, "L") = Cells(sRow, "L")

SumL = SumL + Cells(sRow, "L")

End If
Next sRow
Next I
End Sub