Office中国论坛/Access中国论坛

标题: 如何让EXCEL表中的单元格，根据不同的文本值，自动显示成不同的颜色 [打印本页]

作者: karoly 时间: 2007-7-2 05:19
标题: 如何让EXCEL表中的单元格，根据不同的文本值，自动显示成不同的颜色
请高手帮忙！

附件中的COLOR2中有一个例子：我将B3原来数值5改为4，则C3的文本值会相应变成“西”，但C3单元格颜色还是绿色，没有变成相应的蓝色。如何能让其变为蓝色呢？

另外，COLOR2中用了宏，不知能否只用EXCEL中的函数公式来实现全部功能呢？

作者: karoly 时间: 2007-7-4 15:22
请高手帮忙！！！急急急！！！！！！

作者: cchhrr888 时间: 2007-7-4 17:29
文件呢?

作者: karoly 时间: 2007-7-6 15:25
请查看附件！[attach]25254[/attach]

作者: pureshadow 时间: 2007-7-13 21:09
如果是三种颜色是可以用条件格式的，如果超过三种，还是老老实实用VBA吧。

作者: karoly 时间: 2007-7-18 02:59
高手、专家们帮帮忙吧！！！急！急！急！

作者: intothestorm 时间: 2007-7-19 23:29
公式只能设置3种颜色.谁能告诉我怎么发附件?

作者: pureshadow 时间: 2007-7-20 04:32
把文件压缩成RAR就可以上传了。

作者: intothestorm 时间: 2007-7-20 15:57
标题: 回复：（karoly）如何让EXCEL表中的单元格，根据不同的...
用条件格式做的,只能有3种颜色.[attach]25416[/attach]

作者: karoly 时间: 2007-7-21 05:08
怎么才能实现4种颜色的显示呢？急！！！

作者: pureshadow 时间: 2007-7-21 07:07
4种以上的，用VBA啊

<TABLE 669pt; BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=892 border=0 x:str>

<COLGROUP>

<COL style="WIDTH: 669pt; mso-width-source: userset; mso-width-alt: 28544" width=892>

If Target.Column = 1 Then

      Select Case Target.Value

         Case "蓝"

            Target.Font.Color = RGB(255, 255, 255)

            Target.Interior.Color = RGB(0, 0, 255)

         Case "红"

            Target.Font.Color = RGB(255, 255, 255)

            Target.Interior.Color = RGB(255, 0, 0)

         Case "黄"

            Target.Font.Color = RGB(0, 0, 0)

            Target.Interior.Color = RGB(255, 255, 0)



         Case "绿"

            Target.Font.Color = RGB(0, 0, 0)

<TR 15.75pt" height=21>

<TD class=xl28 #dadce4

作者: 3990060 时间: 2007-8-31 20:51
我正想要的东西，不错

作者: vincentyxd 时间: 2007-9-1 13:46
标题: good
good，very good

作者: 13912668356 时间: 2008-5-6 11:03
把文件压缩成RAR就可以上传了

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)