Match (2 criteria) then copy paste

I want to match my database with 2 criteria, in columns AB and AC with the range columns A and B.
If they match, it should copy and paste the corresponding columns from my database to the range. It should copy and paste when match, like lets say AD6 in D10 and AE6 in E10.
I want the other formulas in the columns A:F to be intact, I want it to just paste the times in the matching name and date.

I made this up but its rubbish.
Anyone a batter macro? Thanks a lot.


test2 - Copy.xlsm

Option Explicit
Sub FindStr()
     
    Dim rFndCell As Range
    Dim strData As String
    Dim stFnd As String
    Dim fCol As Integer
    Dim sh As Worksheet

    Set sh = Sheets("TIMESPAN")
    stFnd = sh.Range("AB6").Value
     
    With sh
        Set rFndCell = .Range("A:B").Find(stFnd, LookIn:=xlValues)
        If Not rFndCell Is Nothing Then
            fCol = rFndCell.Column
            sh.Range("AB6:AE").Copy sh.Cells(6, fCol)
        End If
    End With
     
End Sub