[第106期]七彩虹[已结]

悠悠的炊烟

前些日子想画道彩虹，满天下找彩虹渐变色RGB，未果。
郁闷之余自己动手配色，做出自己想要的渐变色。假如你也同样闲的发慌，不妨动手试试。

身为一道彩虹，雨过了就该闪亮整片天空。

题目要求：
1. 配色：灵活配色，实现右边两种图表的颜色渐变效果。
根据给出彩虹七种颜色配出彩虹渐变色，RGB值放置在H:J列并以H6作为左上角，并填充相应的K列单元格演示颜色渐变效果。
最终彩虹渐变色应用于图表，要求色彩过渡自然。配色要求自己完成，不可复制其它数据源或手动输入。
2. 做图表，效果见右图及动画所示。
3. 曲线状彩虹图中彩球的颜色随着移动位置的变化而变化，并跟其垂直位置上彩虹的颜色一致。
4. 其它效果详见动画。GGG录的动画效果太差，大家将就着看个意思吧。
5. 方法不限，环状彩虹图中图片可自己随便找。

=============================================================
关于渐变色到底应配多精确？不好用数字界定，凭整体效果图，要求彩虹色过渡自然。
评分规则，完全符合者，加2技术分；否则视实际效果待定。
题目有效期 2014-6-4 至 2014-7-30
=============================================================
为鼓励参与，对于优秀答案，评3个技术分。
2014-07-20
=============================================================

yjh_27

动手试试。

w83365040371

使用了两张图叠加的方式做的

flykiss80

又改进了一下，不断学习

悠悠的炊烟

彩虹题总结 & 批改

一、        构思：通过VBA协助完成以下1~4
1.        配色
根据给出的彩虹七种颜色配出符合两张图表要求的渐变色，两张图表需要的渐变色个数是不同的。在现实中我们常需要根据数据系列或数据点的数量来取不同的渐变色颜色，这题就是要解决灵活配渐变色的需求，为自己做一个简易的配色工具。
2.        做环状彩虹图
构造做图数据源做环形图，把配好的渐变色应用到该图表中。
3.        做曲线状彩虹图
构造做图数据源做曲线状图表。该曲线为正弦曲线，因此需要写或找一个正弦曲线方程，构造做图数据源，然后做图，最后把配好的渐变色应用到该图表中。
4.        两图叠加，通过组合框窗体控件调用这两张图表。

二、        具体实施，具体详见附件
1.        渐变色配色
1)        七彩共有六组渐变色，每组各有X种渐变色组成，X=数据系列或数据点数量(即单元格引用N1)/6，N1由程序根据所选图形赋值。六组颜色分别为前一种七彩主色调向后一种七彩主色调的渐变，如赤色-->橙色的过度为一组，橙色-->黄色的过度为另一组。
2)        R, G, B均采用相同计算原理：
a)        每组颜色中的第1种颜色为前面的七彩主色调（最后一个除外）；
b)        其它皆为：该组中前一种渐变色+(后面七彩主色调-前面七彩主色调)/N2。
3)        环状图的第1个系列在内环为紫色，最后一个系列在最外环为红色，正好跟给出的颜色顺序相反，所以选择该图形时需要通过函数把七彩RGB排列顺序颠倒一下。

2.        做环状彩虹图
环状图，255个数据系列（图表最大数据系列），尽可能让颜色渐变的自然。一个数据系列一个环，每个数据系列两个数据点，其中一个点配成可见的半圆彩虹（上半圆），另一个点颜色同背景（下半圆）。

3.        做曲线状彩虹图
1)        正弦曲线方程：y=A*sin(xt+α)
A幅值 ；                        A = 1
x=角频率  ；                x = 1~360
α=初相位角；                α= 0
t=自变量；                         t = 1
2)        曲线状彩虹
根据正弦曲线方程计算彩虹曲线的X、Y值，做散点图，一个数据系列，共360个数据点，每个点配一个彩虹渐变色，呈现彩虹渐变。
3)        彩球（散点）
散点，数据区域v1:w1,  v1=1~360，由程序的循环语句赋值，W1从W5:W364取值+0.65， 0.65是为了让彩球悬浮在曲线上。
4)        把配好的渐变色应用到图表中
彩虹颜色从赤橙黄绿青蓝紫逐渐渐变，同时彩球的颜色随着移动位置的变化而变化，并跟其垂直位置上彩虹的颜色一致。

4.        两图叠加，通过组合框窗体控件调用这两张图表
两张图表叠加在一起，通过VBA设置它们是否可见，调用到谁谁就可见，另一张图则不可见。

5.        其它技巧：
1)        先做好图表，然后再通过VBA配色，最后通过循环动起来；
2)        配好的彩虹渐变色装入数组，可以直接给图表配色，提高速度。“题目要求把配好颜色的RGB值写入单元格指定地址，并填充单元格演示颜色渐变效果。”目的只是为了今后可以作为配色工具来继续发挥作用。
3)        具体详见附件中代码。
----------------------------------------------------------------------------------------------------------------------------------------------------------

答题批改：

2楼：yjh_27
VBA法，一张图表完成。
1.        彩虹渐变色配色：100% 满足要求
通过在单元格E5输入两主色调之间的间隔数，控制渐变色生成的个数 = 6*两主色调之间的间隔数+1
2.        环状彩虹图：50% 满足要求
散点图，6*两主色调之间的间隔数+1个数据系列，每个系列为一环分别配上1种渐变色实现彩虹渐变色的过渡。
不足：两主色调之间的间隔数过小时，彩虹渐变效果不好；过大时，处理时间较长且出现在开始后停顿最后忽然出现整个彩虹图。且会出现不正常关闭文件的现象。
3.        曲线状彩虹图之曲线： 100% 满足要求
折线图，1个数据系列，由6*两主色调之间的间隔数+1个数据点组成这个数据系列，每个点分别配上1种渐变色实现彩虹渐变色的过渡。两主色调之间的间隔数应取大些，这样曲线才能圆滑且渐变色过渡自然。
为什么要用折线而不用散点图呢？
4.        曲线状彩虹之彩球： 20%满足要求
居然用了折线的数据标签，加一个散点不就能实现题目要求吗？

3楼：w83365040371
VBA法，两张图表叠加完成。
1.        彩虹渐变色配色：40% 满足要求
在图表中实际完成渐变色的配色，且达到题目要求，但未能按照题目要求在单元格输出RGB值，且未在单元格模拟填充效果。
2.        环状彩虹图：100% 满足要求
圆环图，两主色调之间的间隔数=10，共6*10+1个数据系列，每个系列有两个点组成一环，上半环分别配上1种渐变色实现彩虹渐变色的过渡。
颜色渐变自然，动态变化流畅。但间隔数可以再取大点，渐变色会更棒。
3.        曲线状彩虹图之曲线： 100% 满足要求
散点图，1个数据系列，两主色调之间的间隔数=100，共6*100+1个点组成这个数据系列，每个点配上1种渐变色实现彩虹渐变色的过渡。
颜色渐变自然，动态变化流畅。
4.        曲线状彩虹之彩球： 100%满足要求
散点图，1个数据系列，颜色变化达到题目要求。

4楼：flykiss80
VBA法，一张图表完成。
1.        彩虹渐变色配色：不满足要求
手工输入题目给出的彩虹七种颜色RGB值，其它采用分段输入公式下拉生成。由于采用数据点过少导致彩虹渐变不自然。
未能按照题目要求在单元格输出RGB值，且未在单元格模拟填充效果。
2.        环状彩虹图：90% 满足要求
散点图，6*两主色调之间的间隔数5+1个数据系列，每个系列为一环分别配上1种渐变色实现彩虹渐变色的过渡。
赞：数据源的构造、生成图表新数据系列、包括格式化在内的动作皆通过VBA完成，非常不错。动态变化流畅。
不足：可惜数据系列做的过少，导致颜色渐变不够自然。
3.        曲线状彩虹图之曲线： 90% 满足要求
散点图，6*两主色调之间的间隔数5+1个数据系列，每个系列分别配上1种渐变色实现彩虹渐变色的过渡。
赞：数据源的构造、生成图表新数据系列、包括格式化在内的动作皆通过VBA完成，非常不错。动态变化流畅，速度再慢一点就更好啦。
不足：可惜数据系列做的过少，导致颜色渐变不够自然。
4.        曲线状彩虹之彩球： 100%满足要求
散点图，1个数据系列，颜色变化达到题目要求。