您的位置: 首页 > Office技巧 > excel技巧

VBA批量设置图标集条件格式

时间:2014-10-12 整理:docExcel.net

[Word如何设置虚线文本框]近期有用户想要制作虚线文本框来美化Word文档的页面,那么应该如何操作呢?一起来了解一下吧...+阅读

在Excel 2007/2010中设置图标集条件格式时,通常是同时对区域中的全部单元格进行设置的。但有时也有例外,如下图中C2:C1000区域中的各单元格的值为同行A列与B列的差值,需要在C列中设置图标集:

要求如下图:

在这种情况下,由于C列单元格中的图标集仅仅与其他列中的单元格值有关,而与本列中的其他单元格无关,因而无法直接对C2:C1000区域同时设置图标集。如果手动对C列中的每个单元格逐一设置图标集,在数据量较大的情况下几乎无法实现。要实现这个目的,可以用下面的两种方法:

方法一:用VBA代码

1.按Alt+F11,打开VBA编辑器,在代码窗口中粘贴下列代码:

Sub IconSet()

Dim rCell As Range

Application.ScreenUpdating = False

Range("c2:c1000").FormatConditions.Delete

For Each rCell In Range("c2:c1000")

rCell.FormatConditions.AddIconSetCondition

With rCell.FormatConditions(1)

.IconSet = ActiveWorkbook.IconSets(xl3Symbols2)

With .IconCriteria(2)

.Type = xlConditionValueNumber

.Value = 0

.Operator = 7

End With

With .IconCriteria(3)

.Type = xlConditionValueFormula

.Value = "=OFFSET($A$1,ROW()-1,0)*0.2"

.Operator = 5

End With

End With

Next

Application.ScreenUpdating = True

End Sub

2.关闭VBA编辑器,按Alt+F8,打开“宏”对话框,选择“IconSet”宏名执行代码。

上述代码对C2:C1000区域中各单元格逐一设置图标集,选择C列中的某个单元格,如C8,在“开始”选项卡的“样式”组中单击“条件格式→管理规则”,在弹出的对话框中单击“编辑规则”,可以看到上述代码所设置的图标集条件格式,如图。

由于在条件格式的图标集、色阶、数据条中无法使用相对引用,因而使用下面的公式:

=OFFSET($A$1,ROW()-1,0)*0.2

该公式在图标集条件格式中总可以引用同行A列单元格的值。

方法二:用辅助列

方法是在C列在左侧插入一个辅助列,然后在辅助列中设置图标集条件格式,设置后看上去类似直接在D列中设置的图标集。

1.在C列左侧插入辅助列,先前的C列变为D列。选择C2单元格,在其中输入公式:

=D2/A2

然后向下填充公式到C1000单元格。

2.选择C2:C1000区域,在“开始”选项卡的“样式”组中单击“条件格式→新建规则”,在弹出的对话框中,默认已选择了“基于各自值设置所有单元格格式”。在下方的区域中,选择“格式样式”为“图标集”,“图标样式”选择“三个符号(无圆圈)”,类型都选择为“数字”,分别设置为“0.2”和“0”。勾选“仅显示图标”,如下图。

3.单击“确定”。Excel会在C列中设置图标集,最后设置适当的列宽即可。

本文地址:https://www.docexcel.net/show/3_3807.html

以下为关联文档:

Excel2021怎么设置单元格字数我们在日常使用表格时,想要将字数限制在一定的长度以内,那么Excel2021怎么设置单元格字数?这篇文章主要介绍了Excel2021单元格输入字数设置方法,需要的朋友可以参考下...

Word怎么设置段落公式和文字水平对齐不少用户在使用Word文档编排文字的时候,经常会在自己的Word文档中插入一些公式,那么Word怎么让段落的公式和文字水平对齐呢?一起来了解一下吧...

Word怎么设置图片衬于文字下方我们在设计一份文稿时,常常需要加入一些图片,使我们的内容更加丰富,那么如何将这些图片衬与文字下方呢?一起来了解一下吧...

excel数字下拉递增怎么设置大家知道excel如何设置数字下拉递增吗?应该有的小伙伴不知道怎么设置吧,那就看一看小编给大家讲解的方法哦,希望大家能够得到帮助...

excel如何设置行高和列宽这篇文章主要介绍了excel如何设置行高和列宽?excel设置行高和列宽方法汇总的相关资料,需要的朋友可以参考下本文详细内容介绍...

如何在word中设置页码从第三页开始这篇文章主要介绍了如何在word中设置页码从第三页开始?word设置某页为第一页操作教程的相关资料,需要的朋友可以参考下本文详细内容介绍...

10种excel多条件查找函数的使用方法汇总这篇文章主要介绍了10种excel多条件查找函数的使用方法汇总的相关资料,需要的朋友可以参考下本文详细内容介绍...

excel奇偶行如何设置不同的颜色在Excel中,如果密密麻麻的单元格背景颜色都一样,有时还真能让人看花眼,为了让其层次分明,增强视觉效果,可以给奇偶行设置不同的背景颜色,具体方法如下...

Excel2021如何设置相同的列宽列宽的大小不一致?Excel2021怎么设置一样的列宽?这篇文章主要介绍了Excel2021设置相同列宽的方法,需要的朋友可以参考下...

相关推荐: