For a special project I need to be able to copy the contents of one cell to
another *including* all formatting. Sometimes I cannot help but to overwrite
a cell I need later on. The tricky part comes when I have to recall the lost
formatting of that overwritten cell. I basically don't have, or want,
permission to rework any sheets that this little 'machine' is going to be
attached to, nor do I want to put such a burden on its users.

For instance, I can get .Interior and put it in an object variable like
this:

Dim interiorTemp as Interior

Set interiorTemp = rngTest(x, y).Interior

Now interiorTemp has all parameters for font, pattern and their color.
Nifty. But I cannot find *any* simple way to do the reverse:

Set rngTest(x, y).Interior = interiorTemp (Error 13, types don't
match)

The help in my version of Excel doesn't specify this but someone pointed out
to me these objects are read-only. I find that unbelievable, but fact is, I
cannot restore.

Some forum members (not this forum) told me to swap the styles. But the
cells could have any additional formatting that is not stored in a Style.

I could write a lot of code and restore the members of the saved objects
one-by-one. If I didn't have to swap I could use rngsource.Copy
rngdestination, which seems to do everything I need, until I need to swap
contents of two cells.

So, the simple question is: How do I put saved formatting into a cell? Is it
possible?

Ava.