Microsoft Office Forums - View Single Post - Pasting from one cell to another & keeping it's color

jolivanes · 01-10-2018, 09:58 PM

Simmilar what the "traininglady" alluded to.

Code:

Sub Try()
 Range("A1").Copy
 Range("A3").PasteSpecial Paste:=xlPasteAll
End Sub

AFAIK, cut instead of copy does not work. We might hear from someone that proves this idea wrong though.
If it is true, you might have to go back and delete after the pastespecial is done.