JCO expressed precisely :
I have a Macro that does several things including getting the Cell
Background Fill, store it, do some work, then restore the Cell
Background Fill. However, when doing this, the Cell Gridlines are
gone. I understand I can set the Background Fill to "No Color" to
restore this, but that would defeat the purpose of restoring the
color as mentioned earlier.
Code snip below:
' Change Cell Background Color
'
Dim vCellBackgroundFill As Variant 'store color
Dim vCellBackgroundNoFill As Variant 'store background grid
vCellBackgroundFill = Selection.Interior.Color
' Do other work here
With Selection.Interior
.Color = vCellBackgroundFill 'restore background
fill to original color
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Thanks for your help
Gridlines only display when cells have no .Interior.Color! You can,
however, simulate gridlines by giving cells with color a dotted line
border.<g
--
Garry
Free usenet access at
http://www.eternal-september.org
Classic
VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.
vb.general.discussion