如果活动单元格(两行或更多行)位于同一列中,则突出显示单元格

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了如果活动单元格(两行或更多行)位于同一列中,则突出显示单元格相关的知识,希望对你有一定的参考价值。

我知道如何使用单个活动行的条件格式来突出显示单元格

=CELL("address")=CELL("address",C$5)

怎么做但有两行或更多行(5,7,9,11)

答案

将条件格式基于三个条件的AND。

=and(row()>=5, row()<=11, mod(row(), 2)=1)

更新版本的Excel可以使用isodd(row())而不是mod(row(), 2)=1

另一答案

Highlight Cells in Specified Row

  • 在Visual Basic编辑器(Alt + F11)中将此代码复制到要运行此代码的工作表的工作表窗口(双击)。
  • 调整常量部分中的值(cRngcRangecRow cColor)以满足您的需求。

代码

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Const cRng As String = "C3:AM3"     ' Target Range
    Const cRange As String = "C5:AM27"  ' Source Range
    Const cRow As Long = 3              ' Target Row Number
    Const cColor As Long = 3            ' Color Index e.g. 3 is Red.

    Dim rng As Range  ' Intersect Range
    Dim i As Long     ' Rows Counter
    Dim k As Long     ' Areas Counter

    ' Create a reference to Intersect Range.
    Set rng = Intersect(Target, Range(cRange))

    ' Remove color in all cells of Target Range.
    Range(cRng).Interior.ColorIndex = xlNone

    If Not rng Is Nothing Then
        ' Loop through Areas of Intersect Range.
        For k = 1 To rng.Areas.Count
            ' Loop through rows of current Area of Intersect Range.
            For i = 1 To rng.Areas(k).Rows.Count
                ' In current Area of Intersect Range
                With rng.Areas(k)
                    ' Check if current row number of current area of Intersect
                    ' range is odd.
                    If .Rows(i).Row Mod 2 = 1 Then
                        ' Apply color to all cells in row cRow of Worksheet
                        ' whose columns are the same as those of Current Area
                        ' of Intersect Range.
                        Cells(cRow, .Column).Resize(, .Columns.Count) _
                            .Interior.ColorIndex = cColor
                        Exit For
                    End If
                End With
            Next ' Row of current Area of Intersect Range.
        Next ' Area of Intersect Range.
    End If

End Sub

以上是关于如果活动单元格(两行或更多行)位于同一列中,则突出显示单元格的主要内容,如果未能解决你的问题,请参考以下文章

使用getValue()的Google Sheet两行单元格

如果该列中的任何单元格包含红色,则突出显示列标题

Excel:如果在另一列中发现重复的单元格值,则突出显示绿色

如果另一列中的相应行包含特定值,我想使用条件格式突出显示一列中的单元格

Ag-Grid:如何在不选择行的情况下单击行或该行的任何单元格突出显示特定行?

EXCEL 2016。如果 Sheet1 中的多个单元格与 Sheet2 中的多个单元格匹配,则突出显示行