Copy format of a referenced cell
 

I have code that sets the value of a cell to a referenced cell whose
name is in FilterAttributeName.

Workbooks(WorkWkb).Worksheets("work").Cells(Target Row, "E").Formula = _
"=" & FilterAttributeName

I now want Cells(TargetRow, "E") to have the same format as the
referenced cell. What is the easiest way to do this?

--Thank you,
--Mike Jr.