Copy Paste Special

[tmcrouse]

I am at a loss as to how to get this code to paste special since it is from a calculated field: Any advice?

Sub Copy7()
Worksheets("2018 PROACTIVE COA").Range("E25").Copy _
    Destination:=Worksheets("CAREMORE").Range("C3:C6").PasteSpecial _
            Paste:=xlValues
End Sub

 

[Fluff]

Try

Sub Copy7()
Worksheets("2018 PROACTIVE COA").Range("E25").Copy
Worksheets("CAREMORE").Range("C3:C6").PasteSpecial _
            Paste:=xlValues
End Sub

 

[tmcrouse]

Awesome. Thanks Fluff.

 

[Fluff]

Glad to help & thanks for the feedback