excel中使用vba突出显示符合条件的数据的方法
来源:网络收集 点击: 时间:2024-05-22首先我们打开一个工作样表作为例子,例子中我们进行筛选的是大于1400这个数值的数据。

按alt+f11进入vba编辑器,并在工程窗口中创建一个新的模块。

在模块中我们键入以下代码,接下来我来详细解释代码的作用。
Sub 显示大于1400的数值()
Dim i As Integer
For i = 6 To 13
If Sheets(1).Cells(i, 4).Value 1400 Then
Sheets(1).Cells(i, 4).Select
Selection.Font.FontStyle = 倾斜
Selection.Font.ColorIndex = 3
End If
Next
End Sub

首先是定义模块名称,这里为了记忆方便,我们选择了中文名称。然后定义一个变量为双字节变量,可以提高vba的处理速度。不过这里可以提醒一点,因为计算机性能的发展,这里定义变量的内存范围已经补是很重要了。

接下来我们定义的是工作薄1也就是sheet1中数据所存在的单元格范围,使用for函数循环赋值行,并确定列值为4.然后使用cells函数将数据返回进原工作薄。这一段使用if函数对语句进行判断,取值大于1400的值则进行select,并将其倾斜并填充为红色字体。

最后我们可以在表格中实际运用一下,可以看到D列对应范围内大于1400的值变成了红色并倾斜。大家可以以此方法修改,扩充整个表格的数据判断。

谢谢大家的投票。
你的投票是我编辑经验的动力。谢谢。
EXCEL表格VBAIF版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_823904.html