Re: Color Pallete Problem

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

From: Peter T (peter_t_at_discussions.microsoft.com)
Date: 04/18/04 

Date: Sun, 18 Apr 2004 08:14:12 -0700

Hi Becky,

Well there's got to be a reason, I assume giving up is not
an option!

I take it your inability to reset a customized palette
applies to all including new files, not only your old
files. It seems established that lurking somewhere is an
old file / old palette. Even so I don't know why that
should cause these problems. Try some elimination, testing
as you go:

Remove everything in your XlStart folder to a temporary
adjacent folder. Same if you have an "Alternate startup
file location" (Options/General). Did you say you are on
a network, if so do likewise on your server. Under
the "Window" menu, Unhide should be greyed out. No shared
files.

Make a list of checked Add-ins (Tools) and uncheck them.
If you cannot do same on your server ask if there are any
old bespoke add-ins (don't know if these would load to
you).

On another PC run following over a new wb to save the
definition of a default palette (put the macro in yet
another wb, make the new wb active)

Sub SavePalette()
Dim i As Byte
For i = 1 To 56
Cells(i, 1).Value = ActiveWorkbook.Colors(i)
Cells(i,2).interior.colorindex = i
Next
End Sub

Save the new file as MyBook.xls and also as "Book.xlt"
(not Book1.xlt, an easy mistake). Mail or floppy to your
PC. Do some customise/reset tests with MyBook.xls

Insert a new Column A and run Savepalette again, but
comment the line that applies the colorindex format (no
need to colour cells again, they will change to display
the current palette). While customizing / resetting use
this formula to look for differences:
=A1=B1 copy down and look for False.

Put Book.xlt in your XlStart folder. Restart XL and new
wb's should show numbers in A1:56. Try some more
customize / reset tests on new & old files as for
MyBook.xls

Still cannot reset, run following with the palette colour
value numbers in A1:A56

Sub LoadPalette()
Dim i As Byte
For i = 1 To 56
ActiveWorkbook.Colors(i) = Cells(i, 1).Value
Next
End Sub

This should customise the palette with the that of the
default palette (looks same but a workaround to resetting
the default palette). However as Test2 does not work this
may not either, it works in a similar way. But if it does
try Test2 and Test3 again.

When done remove Book.xlt from xlstart.

I'm not over optimistic any of the above will solve the
problem but give it a shot. Some of what I suggest is
based on my speculation that the default palette is
defined by an algorithm / loop method (rather than
constants), possibly contained with the WB in addition to
constants of any customized palette. And that the "old"
definition can somehow corrupt the "new" definition. I
could be totally wrong about this idea, but it ties up
with some other observations I've made.

Good luck,
Peter

>-----Original Message-----
>Hi Peter,
>
>That is correct. Tried changing the red and the orange
(old and new)
>and same thing happens. Can not reset.
>
>Test2 does not work. Test3 does not work.
>
>This is what else I've tried:
>1) I decided to reinstall office AGAIN and noticed that
the last time I
>reinstalled it, I didn't completely remove Office XP
before
>reinstalling. In fact it looked like I had just upgraded
when I
>installed it the first time. I noticed that part of the
old Office was
>still installed. I got excited at this point because that
would explain
>the problem. So I completely removed all of MS Office,
old and new,
>and reinstalled it. No change. :(
>
>2) I went on someone elses computer to verify that the
reset button in
>Excel 2002 does work the way its supposed to. It does.
>
>book.xlt: I thought that I had it as well. I was
confused...thinking
>that when you start a new workbook that is the file the
windows uses by
>default not knowing that that is the case only if you
create a custom
>template.
>
>I'm about ready to give up...
>
>Becky
>
>
>---
>Message posted from http://www.ExcelForum.com/
>
>.
>

Quantcast