From the Recorder:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 4/22/2009 by James Ravenswood
'

'
Range("C2").Select
Selection.Copy
Range("E2").Select
Selection.PasteSpecial Paste:=xlPasteAllExceptBorders,
Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub

--
Gary''s Student - gsnu200848


"LiAD" wrote:

Hi,

I am using a PasteSpecial Paste:=xlPasteFormats code to copy cells plus
format from one sheet to another. This code copies everything.

I do not want to copy the cell border format just contents, content size,
colour, format etc plus any filling in the cells.

Is there a condition I can set so it does not copy border formats?

Thanks