突出显示Excel中特定列中的负值

问题描述 投票:0回答:1

出于某种原因,此代码突出显示了整个M列。我对VBA还是很陌生,如果很明显,请对不起。我如何才能仅突出显示列中的负值?

Sub HighlightNegatives()

    Dim rCell As Range
    Dim rng As Range   

    Set rng = Range("M:M")

        For Each rCell In rng.Cells            
            If rCell.Value < 0 Then
                rng.Font.Color = RGB(255, 0, 0)
                rng.Font.Bold = True
            End If
        Next
End Sub
excel vba excel-vba
1个回答
0
投票
Sub HighlightNegatives() Dim rCell As Range Dim rng As Range Set rng = Range("M:M") For Each rCell In rng.Cells If rCell.Value < 0 Then rCell.Font.Color = RGB(255, 0, 0) rCell.Font.Bold = True End If Next End Sub

说。您有理由不能使用条件格式吗?

© www.soinside.com 2019 - 2024. All rights reserved.