条件格式图标集相对引用

1987625sun · 发表于 2015-3-4 10:27

数据分析1984 发表于 2012-12-14 18:43
我研究出来了，可以！！！！！
1、在图标集中的类型选择为公式，请见附件“图1”
2、关键在于“值”怎么设 ...

太强悍，赞一个！

lybbh · 发表于 2016-1-13 19:43

7楼已经是正解

zhhengfly · 发表于 2016-3-16 13:45

这个我也试了一下，好像必须每次都得点一下，经常出错。

chd1983cn · 发表于 2016-4-10 15:40

zhhengfly 发表于 2016-3-16 13:45
这个我也试了一下，好像必须每次都得点一下，经常出错。

确实会有这个问题，估计是bug吧？
这个方法现在看来是最好的方法了。

xgyzp · 发表于 2016-4-11 16:07

我也遇到这个问题 Excel版本是2010 8楼的方法用不了总是出错于是自己写了一段VBA 以后碰到这个问题搜到这个帖子的可以参考这个代码来实现批量图标集相对引用

Sub tjgs()
Dim addstr As String '请先清空该区域的条件格式
Dim rng As Range
For Each rng In Range("b1:b10,d1:d10") '填写条件格式区域
addstr = rng.Offset(0, -1).Address '填写条件格式相对引用的位置，以原单元格为基准，下移N行右移N列，例子中的是行不变列左移一个
rng.Select
Selection.FormatConditions.AddIconSetCondition
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1)
.ReverseOrder = False
.ShowIconOnly = False
.IconSet = ActiveWorkbook.IconSets(xl3Arrows)
End With
With Selection.FormatConditions(1).IconCriteria(2)
.Type = xlConditionValueNumber
.Value = "=成果!" & addstr '修改表名
.Operator = 7
End With
With Selection.FormatConditions(1).IconCriteria(3)
.Type = xlConditionValueNumber
.Value = "=成果!" & addstr '修改表名
.Operator = 5
End With
Next
End Sub

复制代码

lyjsh · 发表于 2016-8-25 11:09

不好意思挖坟了。
试了下8楼的方法，可以用也很简便。要注意的问题就是需要一个个设置格式，这样不会出错。
如果是批量选中了进行设置，显示的icon会与实际情况不符。

花花小女子倩儿 · 发表于 2016-11-23 13:19

结合函数用起来会很简单吧

dongwenquan · 发表于 2017-6-2 07:25

@xgyzp 能够解读一下VBA代码吗？

lgksinly · 发表于 2017-10-7 15:31

一个是公式方法：简单易用，数量少可以
一个是VBA方法：很大批量的时候

zbbbk · 发表于 2017-10-25 18:01

本帖最后由 zbbbk 于 2017-10-25 21:10 编辑

1987625sun 发表于 2015-3-4 10:27
太强悍，赞一个！

8楼的方式没有用的。其实和取第一个应用区域的绝对单元格是一样的。永远只能取你作用域的第一个数。不管你是用INDIRECT还是直接输$绝对位，结果都一样。除非你每个单元格设置一个规则。

但，在此基础上需要做一个手工活就可以了。做第一个单元格后，或一行几列的单元格都可以。然后选中该列和几列的第一行，”双击“格式刷，一定要双击。然后按住下键头不放，一直拖到表尾松开手，就OK了。

还可以更快，选中第一行单元格或单元格组后双击格式刷，再按“CTRL+SHIFT+下箭头” 一秒搞定。

		自动登录	找回密码
密码			免费注册

[已解决] 条件格式图标集相对引用

评分