Copy Formatting Question

[hallingh]

I have a generate report macro that takes data from a number of sheets and puts together the main report sheet. I want the macro to copy over the formatting from these sheets as well, but NOT the conditional formatting. Is there a way to copy all formatting except conditional formatting?

Any help is greatly appreciated. Thanks!

Hank

 

[AlphaFrog]

Generally speaking, when you copy-paste the formats, that includes the conditional formatting (CF) as well. I would recommend you paste the formats including any CF. Then just delete the the CF from the destination cells.

Example:

Sheets("Sheet1").Range("A1:B10").Copy Destination:=Sheets("Report").Range("D1:E10")
Sheets("Report").Range("D1:E10").FormatConditions.Delete

 

[hallingh]

Thanks for the response. The reason I don't want to copy the conditional formatting to the destination cells is I already have conditional formatting in place in the destination cells that I want to keep.

Any clue of another way I could get around this issue?

Thanks a lot for the response.

Hank

 

[AlphaFrog]

Copy the Values, Number Format, and Font etc. in multiple steps.
Or
Copy the formats with the CF and then change the CFs after the copy-paste.

I don't know of a one-step method to copy-paste Formats excluding CF.

 

[Gerald Higgins]

A bit clunky, but how about getting the macro to re-write the original CF into the destination cells, after it's been over-written by the Copy / Paste

 

[hallingh]

Thanks for the help. I wasn't certain if it was possible to exclude CF. I will do it in multiple steps.

Thanks!

Hank