Pull from other sheet and concatenate?

I need to filter one sheet and pull the values from the filtered sheet and bring them into another. I need the values that it pulls over to concatenate (Row F) with their corresponding name form the other sheet (Row A). Here is the code I currently have, but I don't know how to get the concatenate function in there??? Any help is appreciated

Sub Contract_Create()
'
' Contract_Create Macro
' Populates contract sheet with current info
'

With Sheets("Panel Calculations Print")
        Set Rng = .Range("F4:F93")
    End With
     
    With Rng
        .AutoFilter field:=6, Criteria1:=">0"
        .SpecialCells(xlCellTypeVisible).Copy
        Range("A18").Select
        Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
        
' Destination:=Sheets("Contract").Range("B18")
        .AutoFilter
    End With
End Sub