Count conditional formatting

Part A) If only 1 cell in a range does has ColorIndex = 0, how can I then set
its interior color to something else?

Part B) If only cell in a relative postion in a multiple range has
ColorIndex = 0, how can I then set its interior color to something else?

ActiveCell.Interior.ColorIndex = 21

ActiveCell.Offset(0,3).Interior.colorIndex = 21

If you want a uniform color index

Selection.Interior.ColorIndex = 21

--
Regards,
Tom Ogilvy


"gocats" <[email protected]> wrote in message
news:[email protected]...
> Part A) If only 1 cell in a range does has ColorIndex = 0, how can I then
set
> its interior color to something else?
>
> Part B) If only cell in a relative postion in a multiple range has
> ColorIndex = 0, how can I then set its interior color to something else?
>
>

Your subject says count conditional formatting, but your question doesn't
seem to pertain to conditional formatting. Perhaps you could restate your
question to give a clearer indication of what you are trying to do and what
the actual conditions are.

--
Regards,
Tom Ogilvy

"Tom Ogilvy" <[email protected]> wrote in message
news:ekr$RG%[email protected]...
> ActiveCell.Interior.ColorIndex = 21
>
> ActiveCell.Offset(0,3).Interior.colorIndex = 21
>
> If you want a uniform color index
>
> Selection.Interior.ColorIndex = 21
>
> --
> Regards,
> Tom Ogilvy
>
>
> "gocats" <[email protected]> wrote in message
> news:[email protected]...
> > Part A) If only 1 cell in a range does has ColorIndex = 0, how can I
then
> set
> > its interior color to something else?
> >
> > Part B) If only cell in a relative postion in a multiple range has
> > ColorIndex = 0, how can I then set its interior color to something else?
> >
> >
>
>

Thanks Tom, but I dont' think you have not quite understood my problem.

All cells in a range (and qroup of ranges) are subject to conditional
formatting. However, if only one cell has Interior.colorIndex = 0, I then
want that one cell to have Interior.colorIndex = 1.

In addition the second part is, if only one cell in a relative postion in
multiple ranges has Interior.colorIndex = 0, then I want that one cell to
have Interior.colorIndex = 1.

"Tom Ogilvy" wrote:

> Your subject says count conditional formatting, but your question doesn't
> seem to pertain to conditional formatting. Perhaps you could restate your
> question to give a clearer indication of what you are trying to do and what
> the actual conditions are.
>
> --
> Regards,
> Tom Ogilvy
>
> "Tom Ogilvy" <[email protected]> wrote in message
> news:ekr$RG%[email protected]...
> > ActiveCell.Interior.ColorIndex = 21
> >
> > ActiveCell.Offset(0,3).Interior.colorIndex = 21
> >
> > If you want a uniform color index
> >
> > Selection.Interior.ColorIndex = 21
> >
> > --
> > Regards,
> > Tom Ogilvy
> >
> >
> > "gocats" <[email protected]> wrote in message
> > news:[email protected]...
> > > Part A) If only 1 cell in a range does has ColorIndex = 0, how can I
> then
> > set
> > > its interior color to something else?
> > >
> > > Part B) If only cell in a relative postion in a multiple range has
> > > ColorIndex = 0, how can I then set its interior color to something else?
> > >
> > >
> >
> >
>
>
>

conditional formatting colors can not be directly determined using VBA. You
would have to test the underlying condition that would cause the color to
change. So you would have to loop through you range and determine how many
cells in the range meet the condition to be other than coloridex 0 and that
one only is actually colorindex 0. then you would have to remove
conditional formatting from that cell or change the colorindex for the
conditional formatting.

--
Regards,
Tom Ogivy

"gocats" <[email protected]> wrote in message
news:[email protected]...
> Thanks Tom, but I dont' think you have not quite understood my problem.
>
> All cells in a range (and qroup of ranges) are subject to conditional
> formatting. However, if only one cell has Interior.colorIndex = 0, I
then
> want that one cell to have Interior.colorIndex = 1.
>
> In addition the second part is, if only one cell in a relative postion in
> multiple ranges has Interior.colorIndex = 0, then I want that one cell
to
> have Interior.colorIndex = 1.
>
> "Tom Ogilvy" wrote:
>
> > Your subject says count conditional formatting, but your question
doesn't
> > seem to pertain to conditional formatting. Perhaps you could restate
your
> > question to give a clearer indication of what you are trying to do and
what
> > the actual conditions are.
> >
> > --
> > Regards,
> > Tom Ogilvy
> >
> > "Tom Ogilvy" <[email protected]> wrote in message
> > news:ekr$RG%[email protected]...
> > > ActiveCell.Interior.ColorIndex = 21
> > >
> > > ActiveCell.Offset(0,3).Interior.colorIndex = 21
> > >
> > > If you want a uniform color index
> > >
> > > Selection.Interior.ColorIndex = 21
> > >
> > > --
> > > Regards,
> > > Tom Ogilvy
> > >
> > >
> > > "gocats" <[email protected]> wrote in message
> > > news:[email protected]...
> > > > Part A) If only 1 cell in a range does has ColorIndex = 0, how can I
> > then
> > > set
> > > > its interior color to something else?
> > > >
> > > > Part B) If only cell in a relative postion in a multiple range has
> > > > ColorIndex = 0, how can I then set its interior color to something
else?
> > > >
> > > >
> > >
> > >
> >
> >
> >

Thanks Tom.

It looks like I will have to try something else.

"Tom Ogilvy" wrote:

> conditional formatting colors can not be directly determined using VBA. You
> would have to test the underlying condition that would cause the color to
> change. So you would have to loop through you range and determine how many
> cells in the range meet the condition to be other than coloridex 0 and that
> one only is actually colorindex 0. then you would have to remove
> conditional formatting from that cell or change the colorindex for the
> conditional formatting.
>
> --
> Regards,
> Tom Ogivy
>
> "gocats" <[email protected]> wrote in message
> news:[email protected]...
> > Thanks Tom, but I dont' think you have not quite understood my problem.
> >
> > All cells in a range (and qroup of ranges) are subject to conditional
> > formatting. However, if only one cell has Interior.colorIndex = 0, I
> then
> > want that one cell to have Interior.colorIndex = 1.
> >
> > In addition the second part is, if only one cell in a relative postion in
> > multiple ranges has Interior.colorIndex = 0, then I want that one cell
> to
> > have Interior.colorIndex = 1.
> >
> > "Tom Ogilvy" wrote:
> >
> > > Your subject says count conditional formatting, but your question
> doesn't
> > > seem to pertain to conditional formatting. Perhaps you could restate
> your
> > > question to give a clearer indication of what you are trying to do and
> what
> > > the actual conditions are.
> > >
> > > --
> > > Regards,
> > > Tom Ogilvy
> > >
> > > "Tom Ogilvy" <[email protected]> wrote in message
> > > news:ekr$RG%[email protected]...
> > > > ActiveCell.Interior.ColorIndex = 21
> > > >
> > > > ActiveCell.Offset(0,3).Interior.colorIndex = 21
> > > >
> > > > If you want a uniform color index
> > > >
> > > > Selection.Interior.ColorIndex = 21
> > > >
> > > > --
> > > > Regards,
> > > > Tom Ogilvy
> > > >
> > > >
> > > > "gocats" <[email protected]> wrote in message
> > > > news:[email protected]...
> > > > > Part A) If only 1 cell in a range does has ColorIndex = 0, how can I
> > > then
> > > > set
> > > > > its interior color to something else?
> > > > >
> > > > > Part B) If only cell in a relative postion in a multiple range has
> > > > > ColorIndex = 0, how can I then set its interior color to something
> else?
> > > > >
> > > > >
> > > >
> > > >
> > >
> > >
> > >
>
>
>