如何实现excel中的同行跨列数据筛选？

你可以在新录制的宏里插入以下代码，应该能满足你的需要，注意，sheet2是你数据所在的表格名称，可以替换的
Dim a, i As Integer
Dim c As Range

'排序是为了排除空行
Worksheets("Sheet2").Range("A:e").Sort _
Key1:=Worksheets("Sheet2").Range("A1"), _
Header:=xlGuess
'清楚原来做过的标记
Cells.Interior.ColorIndex = xlNone
a = Application.WorksheetFunction.CountA(Worksheets("Sheet2").Range("A:a"))

For i = 1 To a
For Each c In Worksheets("Sheet2").Range(Cells(i, 1), Cells(i, 5))
If c.Value = 1 Or c.Value = "水轮机厂" Or c.Value = 3 Then
With Worksheets("Sheet2").Range(Cells(i, 1), Cells(i, 5)).Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
Exit For
End If
Next
Next i
Set c = Nothing

条件格式可以跨列的把A:E列同时选中，然后引用条件格式，选“公式”输入：
=and(countif($a1:$e1,1)>0,countif($a1:$e1,2)>0,countif($a1:$e1,3)>0)
查看原帖>>

多也可以的吧，一个单元格条件格式后，用格式刷来刷一下就是啦，就不知道能不能用条件格式。

问题是你的数值有几个？
如果少，用条件格式实现咯