Macro to compare data between sheets and copy/paste

Sub ABCTESTABC()

 Const sh1 As String = "test"
 Const sh2 As String = "PIF"
  
 Dim rng As Range, c As Range, FoundCell As Range

    With Worksheets(sh2).Range("a1")
        With .CurrentRegion
            .AutoFilter Field:=8, Criteria1:="U"
            Set rng = .SpecialCells(xlCellTypeVisible)
        End With
        .AutoFilter
    End With
    
    With Worksheets(sh1)
        For Each c In rng.Rows
            If Not rng(c.Row, "f") = vbNullString Then
                Set FoundCell = .Range("f:f").Find(What:=rng(c.Row, "f"))
                If Not FoundCell Is Nothing Then
                    c.EntireRow.Copy .Cells(FoundCell.Row, "a")
                End If
            End If
        Next
    End With
    Set rng = Nothing
    Set FoundCell = Nothing
    Set c = Nothing
    

    
End Sub

How would I alter the above so when it pastes into sheet test it doesn't paste the whole row, instead it just pastes rows A to O ???

I know it's the below line which currently copies the entire row but I just want the range Ax:Ox to be pasted.

If Not FoundCell Is Nothing Then
                    c.EntireRow.Copy .Cells(FoundCell.Row, "a")

Doesn't work at all arlu I'm afraid.

I don't want any columns deleted. What I want is, when the row is copied from sheet PIF, I want it to be pasted into sheet test, but only paste in the row from Ax:Ox.

My original post works perfectly for what I've described. The only issue is that I don't want the whole row copied and pasted, just range A to O in the row.

Doesn't seem to work. Any other ideas?

Basic sheet attached so you can test it.

Book1.xls

Book1.xlsm

OK, I've tested it and what you posted ooeldere works, but, it always give me an object defined error after it runs and highlights the piece of code you gave me even though it does what I now want it to do! Can you check the below sample file with code included?

Thanks!