Excel2010学习贴4：在2003中使用2010的颜色主题

有时候我们也有这种需求：即要在2003中使用2010的颜色主题。原因有二：

    1)你在2010中做好的文档，发给使用2003的人看时，颜色完全变了，而且非常难看。这时需要在2003中带上2010的颜色。

   (2007/2010中颜色很协调的表格，在2003中打开时变得非常刺眼)

    2)有些使用2003的朋友，认为2010的颜色不错，很是喜欢，希望可以在2003中使用2010的颜色。

    前面说到，2010的.xlsx文件仍然兼容了2003的56色模式，所以只要我们在发出.xlsx文件之前，将其默认的2003的56色设置为仿 2010颜色主题的56色，就可以实现在2003中打开时看到2010中的颜色。本日志介绍一种2003中仿2007颜色的方法。

    1、建立2003的56颜色id分布矩阵。

    这些数字为2003的颜色id分布，与颜色面板对应。可参见《Excel图表之道 》一书中的颜色代码分布内容。

    2、用2007的颜色主题填充矩阵。

    要将2010颜色主题的70个颜色转换到2003式的56个颜色，肯定需要舍去一些颜色。结合2003颜色面板的布局，以及作图时Excel默认使用颜色的顺序，我采用如下策略：

    第1-5行的前6列使用2010面板中第1-5行后6列的颜色，第6、7行也使用了2010面板中第1行的颜色，便于图表默认使用。第7、8列使用2010面板中第7行的标准色，以及几个黑白灰色。当然，你也可以按自己的需要填充。

   3、然后运行如下的一小段宏，其实只有1句话，就是将单元格的值所指向的颜色id设置为单元格的填充色。

    Sub fillcolor()

        Dim i As Integer

        Dim j As Integer

        For i = 1 To 7

        For j = 1 To 8

                ActiveWorkbook.Colors(Cells(i, j).Value) = Cells(i, j).Interior.Color

        Next j

        Next i

    End Sub

    这时，这个.xlsx文件的56色已经改变，这可以通过“文件-选项-保存-颜色”的对话框看到。如果我们在2003中打开此文件，或将此文件转存为2003格式，会发现表格仍保持了2010中的格式，工具栏中的颜色面板也是仿2010的。    

（在2003中打开时仍保持了2007/2010的颜色）

    4、2010中有很多颜色主题，以上为模仿默认的office主题。如果你想转换其他的颜色主题到2003，只需要在这个转换文件中切换到该颜色主题， 这个颜色矩阵也会变色，然后运行此宏，该颜色主题的颜色就被设置到56色中，然后转存即可。例如下图为我自定义的FOCUS颜色主题的转换情况。

    5、你可以使用《Excel图表之道 》中介绍的方法，把此文件的颜色模板复制到你的2003文件，也可以将此文件复制为Excel启动目录下的book.xlt，则每次新建的Excel文件都会具有2007/2010类似的颜色面板了。

    以上方法和模板文件，让你不必安装2007/2010就可以使用其颜色，也可以保证你发出的文件在从2007/2010到2003的转换过程中不会丢失颜色。如果觉得有用，欢迎分享本文。

    颜色转换模板文件下载：2003仿2007颜色面板 生成模板.xlsm

    这里提供3款仿2007/2010颜色主题的2003格式颜色模板文件供读者们下载：仿2007默认颜色主题 ，仿2007新闻纸颜色主题 ，仿Focus颜色主题 。如何使用这些颜色模板文件，请参见《Excel图表之道 》一书中相关内容。

    《 Excel 图表之道——如何制作专业有效的商务图表 》， 2010 年最值得阅读的职场充电图书！ 购买链接： 当当 、 卓越 、 淘宝 、 互动网 、 电子社 ，更多信息可查看 “图表之道”专栏 。更多图表好书，尽在EP图表书架 ！