Programmatically copy Conditional formats from one cell to another

B

Barb Reinhardt

I've been trying to figure out how to do this, but haven't beensuccessful.
Can someone give me an idea on how to approach this. I'd like to refer to
the cell with the CF's as r (formatted as a range) and the cell without the
format as r1 (again, formatted as a range)

Thanks,

Barb Reinhardt
 
A

Anand Nichkaode

Hope this helps

Range("F18").Select ' cell with conditional formatting
Selection.Copy ' copy the formatting
Range("I14").Select ' target cell to copy the formats on to
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False ' pastespecial the formats
Application.CutCopyMode = False
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Converting URLs in comments to Markdown-formatted links 2
Copy used range from one worksheet to another (and lose the pivot) 3
Count the Colorindex of a cell with a conditional format 4
Create if partial match then copy and paste data from one cell to another 1
Conditional formats 0
Discontinuous conditional formats 2
A Huge Conditional Format Challenge.... 2
Arrays and scattered cell values or another way? 16

Top