Clearing the interior color properly?

[Maury Markowitz]

I have a function that rolls over a column in a sheet and fills in the
interior color to draw the eye to problems. It's got a lot of entries,
but they basically look like...

src = ast.Range("BV" & i)
Select Case src
Case 1, 2, 3, 11, 18HPL
.Interior.Color = ourPurple
.ClearComments

[ lots more Cases ]

Case Else
.Interior.Color = -1
.ClearComments
end select


The Case Else is there to wipe out any color that may have been put
into that cell on a previous run. But when I set the color to -1, the
border disappears.

1) why does the border disappear when I set the interior?
2) is there some other way to clear out the interior that I should use
instead?

Thanks!

Maury


What I'm really trying to do here is simply remove any color that
might have been there in the past.

 

[Susan]

recording a macro & clearing the color i get:

Selection.Interior.ColorIndex = xlNone

try that.
hope it helps

susan

 

[Maury Markowitz]

Thanks!

 

[Maury Markowitz]

Whoa, ok that did not work. When I use xlNone, the cells turn cyan!

Any ideas anyone?

Maury

 

[Susan]

wow. worked for me in xl2000.
i assume you copied it directly & used ColorIndex instead of just
Color?
i don't have any other ideas, sorry
susan

 

[cush]

Do you have any conditional formating that would turn the interior color on?

 

[Maury Markowitz]

wow.  worked for me in xl2000.
i assume you copied it directly & used ColorIndex instead of just
Color?

No, of course not, like a noob I simply saw "color" and assumed...

It's working great now, thanks!

Maury