Thanks for trying to help. I used

ActiveCell.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

"Dave Peterson" wrote in message
...
If you do Paste|special|values, then the formatting won't change.

Or you could paste the formula?

Or you could just assign the value?

range("a1").copy
range("B1").pastespecial paste:=xlpastevalues

or

range("b1").value = range("a1").value

or
range("B1").value = "my text here"


Hopelesslylost wrote:

Could anybody give me the macro code line to allow me to paste text in
the
"match destination format"

In Word it looks like this:

Selection.PasteAndFormat (wdFormatPlainText)

but I can't find anything in Excel.

Thank's a lot in advance!

--

Dave Peterson