VBA colorscale and color #

[mistus]

hi,
i have a colorscale (conditional formating ) in range A1:A20 and I'm
trying to get color number for each cell. In normal case

a = Range("a1").Interior.Color
b= Range("a2").Interior.Color etc.

works fine.
But when colors of cells are from conditional formating i dont know
how to get color number.
how to do that?
Mistus

 

[Guest]

Sadly getting the conditional format colour is not the same as returning the
colorindex. have a look here:-

http://www.cpearson.com/excel/CFColors.htm

Mike

 

[Marcin]

http://www.cpearson.com/excel/CFColors.htm

it did't solve my problem . "Function ColorOfCF" is very useful but it
works only for stadnard formating (the same as a =
Range("a1").Interior.Color). maybe I sholud write that I use excel 2007

M

 

[Bob Phillips]

It's not simple but see
http://www.xldynamic.com/source/xld.CFConditions.html

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

 

[Bob Phillips]

See my post, that site covers formulae as well.

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

 

[Mark Lincoln]

For what it's worth, if my VBA code needs to worry about the CF
coloring in a cell, I just make the same tests in VBA as I do in the
CF and go from there.

Mark Lincoln