Named cells are range names, use Range (). E.g.If Range("BOB").Value <> Range("TOM").Value ThenRange("BOB").Value = Range("TOM").ValueNo need for copy/paste.