夜雨聆风哈喽，各位老铁，我是你们的老朋友——那个白天在Excel里写代码写到头秃，晚上在公众号后台盯着阅读量焦虑的“双料”老司机。
你有没有过这种经历：老板甩给你一张几千行的销售报表，让你把业绩好的标绿，业绩差的标红，业绩一般的画个黄灯。你吭哧吭哧用鼠标点“条件格式”，点得手都抽筋了。
这时候，作为一名有追求的职场人，你的脑海里应该蹦出一个念头：能不能让代码帮我干？
答案是：必须能！今天咱们就来扒一扒 Excel VBA 里那个让人又爱又恨的IconCriteria（图标判断）对象。
01 IconCriteria是个啥？（说人话版）
在 Excel 的 VBA 宇宙里，IconSetCondition（图标集条件）就像是一个大管家，它负责决定在单元格里显示哪套图标（是红绿灯，还是箭头，还是小旗子）。
而IconCriteria，就是这个大管家手里的“尺子”。
它负责制定规则：
“嘿，数值大于90的，给我挂个绿灯！”
“数值小于60的，给我亮个红灯！”
每一个IconCriteria对象，就代表这堆规则里的一条。如果你的图标集里有3个图标（比如红绿灯），那就会有3个IconCriteria对象在后台默默工作。
02 为什么你要学这个？
因为手动设置太Low了，而且容易出错！
想象一下，你有一百个表格要处理。手动点？等你点完，黄花菜都凉了，老板早就拿着你的工资去招新人了。用 VBA 写个循环，一键搞定，然后你就可以优雅地端起咖啡杯，深藏功与名。
更重要的是，IconCriteria 能解决很多手动操作解决不了的动态引用问题（这点后面细说，是进阶秘籍）。
03 核心属性大揭秘（硬核干货，建议收藏）
别被那些英文单词吓到了，其实就那几个核心参数在捣乱。咱们把它们拆解开来，像剥洋葱一样（虽然不会流泪，但可能会有点辣眼睛）。
Type（类型）：尺子的刻度
这是告诉 Excel 你用什么标准来衡量。
xlConditionValueNumber：直接用数字，比如 60 分。
xlConditionValuePercent：用百分比，比如前 25%。
xlConditionValueFormula：用公式，这个最骚，后面讲。
Value（数值）：及格线
这就是具体的门槛。比如 Type 是数字，Value 是 80，意思就是“80分”。
Operator（运算符）：怎么比
xlGreater：大于。
xlGreaterEqual：大于等于。
别搞反了，不然逻辑全崩。
Icon（图标）：给个面子
你可以自定义每个节点显示什么图标。虽然默认的一套也能用，但如果你想用“红十字”来表示业绩垫底，那就得动这个属性。
04 代码实战：手把手教你“画”图标
光说不练假把式。来，打开你的 VBE（Alt + F11），咱们写一段代码，给 C 列的成绩单加上“五箭头”评级。
假设你的数据在 C1:C12，我们要根据分数高低显示不同箭头。
Sub 给表格装双火眼金睛()Dim cfIconSet As IconSetCondition' 先选中我们要操作的区域Range("C1:C12").Select' 1. 添加图标集条件Set cfIconSet = Selection.FormatConditions.AddIconSetCondition' 2. 选择图标样式：五向箭头（看起来比较专业）cfIconSet.IconSet = ActiveWorkbook.IconSets(xl5Arrows)' 3. 开始定义规则（也就是调整那把尺子）' 注意：IconCriteria(1) 是最低的那一档，(5) 是最高那一档' 第一档：0分以下（虽然不太可能，但为了逻辑严密）With cfIconSet.IconCriteria(1).Type = xlConditionValueNumber.Value = 0.Operator = 7 ' 7 代表 xlGreaterEqual (大于等于)End With' 第二档：60分以下With cfIconSet.IconCriteria(2).Type = xlConditionValueNumber.Value = 60.Operator = 7End With' 第三档：70分以下With cfIconSet.IconCriteria(3).Type = xlConditionValueNumber.Value = 70.Operator = 7End With' 第四档：80分以下With cfIconSet.IconCriteria(4).Type = xlConditionValueNumber.Value = 80.Operator = 7End With' 第五档：90分以上（优秀！）With cfIconSet.IconCriteria(5).Type = xlConditionValueNumber.Value = 90.Operator = 7End WithEnd Sub
运行一下，你会发现 C 列瞬间变得五彩斑斓。这就是代码的力量！
05 进阶玩法：当 IconCriteria 遇上 OFFSET
很多小白（甚至老鸟）在这里会翻车。
场景是这样的：你想根据 A 列的销售额，在 C 列显示图标。但是 C 列的图标标准，取决于 A 列数值的 20%。
如果你直接在 VBA 里写 .Value = Range("A1").Value * 0.2，你会发现所有行的图标都一样！因为 VBA 把 A1 的值算死了一个固定数字。
怎么破？用公式类型！
我们要把 Type 设置为 xlConditionValueFormula，然后在 Value 里填入一个 Excel 公式字符串。
Sub 高级玩法_Offset大法()Dim rCell As Range' 关闭屏幕刷新，让代码跑得飞快Application.ScreenUpdating = False' 假设我们要处理 C2 到 C1000For Each rCell In Range("C2:C1000")' 清除旧格式，防止干扰rCell.FormatConditions.DeleteWith rCell.FormatConditions.AddIconSetCondition.IconSet = ActiveWorkbook.IconSets(xl3Symbols2)' 关键点来了！' 我们想让阈值动态等于同行 A 列数值的 20%' 这里的公式 =OFFSET($A$1,ROW()-1,0)*0.2' 意思是：从A1开始，向下偏移当前行数-1格，也就是取同行的A列值With .IconCriteria(3) ' 假设是最高级那个图标.Type = xlConditionValueFormula.Value = "=OFFSET($A$1,ROW()-1,0)*0.2".Operator = 5 ' xlGreater (大于)End WithEnd WithNext rCellApplication.ScreenUpdating = TrueMsgBox "搞定！老板看了都得给你加鸡腿！"End Sub
这段代码的精髓在于，它让每个单元格的图标判断标准都变成了“活”的，它们各自引用同行的数据，互不干扰。
06 避坑指南（老司机的血泪史）
1. 索引顺序：IconCriteria(1) 永远是最小值（或第一个阈值），别搞反了顺序，不然图标显示会乱套。
2. Operator 常量：Excel VBA 里的运算符常量（如 xlGreaterEqual）有时候在不同版本里数值不一样，建议直接用数字（比如 7 代表 >=，5 代表 >），或者确保你的引用库没问题。
3. 性能问题：如果几千行数据都用 VBA 循环加图标，Excel 可能会卡成 PPT。记得用 Application.ScreenUpdating = False 来加速。
07 结语
写代码和做公众号其实挺像的。
做公众号，是为了在信息的洪流中，让自己的声音被听见；写 VBA，是为了在数据的海洋里，让规律和真相自动浮现。
IconCriteria 只是 Excel 庞大对象库里的一个小角色，但用好它，你就能从“表哥表姐”进化成“数据魔术师”。
别让你的才华被繁琐的重复劳动埋没。学会 VBA，早点下班，多陪陪家人，或者……多写几篇爆款文章，早日实现生活自由！
觉得有用的话，点个“赞赞”再走呗？
你的每一次点赞，都是我爆肝写代码的动力！
