It works for me. Do you have just 2 lines of code? Your post shows 3
lines. HTH Otto
wrote in message
...
Trying to just copy a cell and paste it back into the same cell but as
just the value. It won't do it. It never debugs it just doesn't do
it.....

ThisWorkbook.Worksheets("Shapes").Cells(1, 8).copy
ThisWorkbook.Worksheets("Shapes").Cells(1, 8).PasteSpecial
Paste:=xlPasteValues