求教老哥们，如何实现条件格式匹配到第一个数据时就停止匹配啊

'其它方法，行列不限
Option Explicit
Sub abc()
　Dim a, i, j, n, p
　With [a1].CurrentRegion
　　a = .Value
　　.Interior.ColorIndex = xlNone
　End With
　For i = 2 To UBound(a)
　　n = a(i, 2): p = 2
　　For j = 3 To UBound(a, 2)
　　　If a(i, j) < n Then n = a(i, j): p = j
　　Next
　　Cells(i, p).Interior.Color = vbYellow
　Next
End Sub

或者大佬们有什么办法把每行数据的最小值标记出来吗 随便标记一个就行 不需要全部都标出来

条件格式 =MATCH(MIN($A2:$D2),$A2:$D2,0)=COLUMN()