excel中使用vba突出显示符合条件的数据的方法

1、首先我们打开一个工作样表作为例子，例子中我们进行筛选的是大于1400这个数值的数据。

3、在模块中我们键入以下代码，接下来我来详细解释代码的作用。Sub 显示大于1400的墙绅褡孛数值() Di罪焐芡拂m 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 NextEnd Sub

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