Need help with Macro's format shading

Need help with Macro's format shading

Post by TWFkaGFyd » Mon, 18 Aug 2008 17:10:01


I'm trying to set up some shading macro's or rules for an excel page (excel
2003) and running into a little difficulty. I set up a macro to put in a
light shading to make everything easy on the eyes every even number row:
Range( _
"A8:S8,A10:S10,A12:S12,[through],A94:S94" _
).Select
With Selection.Interior
.ColorIndex = 24
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
Range("G4:M4").Select
End Sub
I also created one to remove the shading.

however, I also have a macro to add a mandatory and needed shading of:
With Selection.Interior
.ColorIndex = 2
.Pattern = xlLightUp
.PatternColorIndex = xlAutomatic
End With
End Sub
This shading will be in random cells and change day by day but needs to stay.

I also have some printing macros that I hope will bennifit from your answers.

My question is: Is there any way to create an exception or something so
that if there are any cells that have the .ColorIndex = 2/.Pattern =
xlLightUp shading in
them then the other shadings/or removal won't overwrite them but instead
leave them and continue filling in the rest of the cells?

Thanks :)
 
 
 

Need help with Macro's format shading

Post by bhicks11 v » Tue, 19 Aug 2008 11:03:20

Sorry Madhart - you posted an Excel question to an Access forum. You'll have
better success posting to an Excel forum.

Bonnie
http://www.yqcomputer.com/



--
Message posted via http://www.yqcomputer.com/

 
 
 

Need help with Macro's format shading

Post by TWFkaGFyd » Tue, 19 Aug 2008 20:30:01

Thanks :)