paste value

C

carlos_ray86

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
 
O

Otto Moehrbach

It works for me. Do you have just 2 lines of code? Your post shows 3
lines. HTH Otto
 
M

Mike H

Hi,

It should work but it's a but there's no need to copy and paste to do it


Sheets("Shapes").Cells(1, 8) = Sheets("Shapes").Cells(1, 8)


Mike
 
K

kwillis74

Does

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

make a difference
 
R

RyanH

You don't have to cut and paste. You can do this:

Range("A1").Value = Range("A1").Value

Hope this helps! If so, click "YES" below.
 
D

Dave Peterson

Maybe you're not running the procedure correctly.

ps.

with thisworkbook.worksheets("shapes").cells(1,8)
.value = .value
end with

would work as well.

But that doesn't address why your code isn't running.
 
Top