Copy format macro needed

[LiAD]

Hi,

I am using a copy paste macro to take the contents of certain cells from a
database and transfer them to other worksheets. The code I am currently
using is

Range("C3:O200").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("CB190").Select
Range("D10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False

Is it possible I can change this code to also copy text and cell formats at
the same time? i.e. text colour, cell filled colour, text size, text colour
etc

Thanks
LiAD

 

[Jacob Skaria]

You can either use

ActiveSheet.Paste
OR
Selection.PasteSpecial

If this post helps click Yes

 

[LiAD]

Great thanks.

One small point. Can I not get it to copy the border formats, just the text
and fill etc?

I have two different sheet formats in terms of borders etc which i need to
maintain.

Thanks a lot

 

[LiAD]

sorted.

thanks

Great thanks.

One small point. Can I not get it to copy the border formats, just the text
and fill etc?

I have two different sheet formats in terms of borders etc which i need to
maintain.

Thanks a lot