Programmatically copy Conditional formats from one cell to another

  • Thread starter Thread starter Barb Reinhardt
  • Start date Start date
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
 
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
 
Back
Top