I am bouncing around code for this and overcomplicating it. What code can I
use to paste all values on every sheet for every cell.

for each sh in Worksheets
sh.UsedRange.Cells.Value = sh.UsedRange.Cells.Value
Next

Merged cells may be problematic (aren't they always) - I haven't tested it
with those.
--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
I am bouncing around code for this and overcomplicating it. What code can
I
use to paste all values on every sheet for every cell.

Thanks, but I ended up using this. Thanks for pointing me in the right
direction. i was having trouble with the paste values function.

For Each sh In Worksheets
Range("a19:d23").Select
Selection.Copy
Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues

Next

End Sub

"Tom Ogilvy" wrote:

for each sh in Worksheets
sh.UsedRange.Cells.Value = sh.UsedRange.Cells.Value
Next

Merged cells may be problematic (aren't they always) - I haven't tested it
with those.
--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
I am bouncing around code for this and overcomplicating it. What code can
I
use to paste all values on every sheet for every cell.

I think you will be disappointed in the results. Instead, modify it like
this

For Each sh In Worksheets
sh.Activate
Range("a19:d23").Select
Selection.Copy
Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues
Next

--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
Thanks, but I ended up using this. Thanks for pointing me in the right
direction. i was having trouble with the paste values function.

For Each sh In Worksheets
Range("a19:d23").Select
Selection.Copy
Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues

Next

End Sub

"Tom Ogilvy" wrote:

for each sh in Worksheets
sh.UsedRange.Cells.Value = sh.UsedRange.Cells.Value
Next

Merged cells may be problematic (aren't they always) - I haven't tested
it
with those.
--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
I am bouncing around code for this and overcomplicating it. What code
can
I
use to paste all values on every sheet for every cell.

This was the final code in case anyone was interested. Again, thanks for
your help and direction, Tom.

For Each sh In Worksheets
sh.Activate
sh.Range("a19:d23").Select
Selection.Copy
sh.Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues
Next


"Tom Ogilvy" wrote:

I think you will be disappointed in the results. Instead, modify it like
this

For Each sh In Worksheets
sh.Activate
Range("a19:d23").Select
Selection.Copy
Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues
Next

--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
Thanks, but I ended up using this. Thanks for pointing me in the right
direction. i was having trouble with the paste values function.

For Each sh In Worksheets
Range("a19:d23").Select
Selection.Copy
Range("a19:d23").Select
Selection.PasteSpecial Paste:=xlPasteValues

Next

End Sub

"Tom Ogilvy" wrote:

for each sh in Worksheets
sh.UsedRange.Cells.Value = sh.UsedRange.Cells.Value
Next

Merged cells may be problematic (aren't they always) - I haven't tested
it
with those.
--
Regards,
Tom Ogilvy


"dogpigfish" wrote in message
...
I am bouncing around code for this and overcomplicating it. What code
can
I
use to paste all values on every sheet for every cell.