Restrict Pasting to Keep Destination Match Formatting Programmatically

[gibbsa08]

Hey guys,

I'm trying to restrict pasting to keep destination formatting however I'm running into a 1004 error. I've tried several different methods including a macro shortcut to paste using xlPastValues with a ctrl + v shortcut. I've also used the following code to no avail. Anyone know a workaround?

'Sub PasteWithDestinationFormatting()
'
'    Dim MyRange As Range
'
'    Set MyRange = Selection

'    MyRange.PasteSpecial xlPasteValues
'
'    Application.CutCopyMode = False
'
'End Sub