Complicaciones con una macro en Microsoft Excel

Buenos días tengo la siguiente macro:
Sub PORTADA()
DimSub PORTADA()
Dim MiFila As Long
Sheets("PORTADA").Select
With Sheets("LISTADO_RECLAMACIONES")
MiFila = .[a65536].End(xlUp).Offset(1, 0).Row
Range("L17").Copy .Range("A" & MiFila)
Range("N17").Copy .Range("B" & MiFila)
Range("I8").Copy .Range("C" & MiFila)
Range("F17").Copy .Range("D" & MiFila)
End With
End Sub
Necesito incluir dos lineas:
Primera: Quiero que la fórmula que tengo en la celda I6, que es =hoy(), me copie EL RESULTADO, en la fila AB
Segunda: Que la fórmula que tengo en la celda D43. Que es ==(HOY())-P4, me copie LA FORMULA, NO EL RESULTADO, y que funcione en la hoja de destino.
Muchas gracias por la ayuda, he buscado en el foro y con mi conocimiento no he conseguido realizarlo. Lo dicho, Gracias por vuestro tiempo y ayuda.

{"Lat":27.9361805667694,"Lng":-15.4248046875}