Excel:根据工作表 A 中的值格式化工作表 B 中的行

Excel:根据工作表 A 中的值格式化工作表 B 中的行

当同一工作簿中不同工作表中同一行的“A”列中出现“X”时,如何为一张 Excel 工作表中的整行添加阴影?

答案1

尝试一下这个小宏:

Sub ShadyRow()
    Dim s1 As Worksheet, s2 As Worksheet, N As Long
    Dim i As Long
    Set s1 = Sheets("Sheet1")
    Set s2 = Sheets("Sheet2")
    N = s1.Cells(Rows.Count, "A").End(xlUp).Row

    For i = 1 To N
        If s1.Cells(i, "A").Value = "X" Then
            s2.Cells(i, "A").EntireRow.Interior.Color = RGB(100, 100, 100)
        End If
    Next i
End Sub

答案2

回答

应用以下“使用公式确定要格式化的单元格Tab 2“对您希望应用阴影的所有单元格进行条件格式设置:

=INDIRECT("'Sheet 1'!R"&ROW()&"C1",FALSE)="X"

将其替换Sheet 1为实际工作表名称Tab 1,并在条件格式对话框中根据需要定义格式。

笔记

  • 仅当工作表名称中包含一个或多个空格时,才需要使用工作表名称两侧的单引号。
  • 参数FALSE告诉INDIRECT它使用 R1C1 样式的引用,而不是 A1 样式的引用。
  • 使用适当的字符串连接构造,可以轻松地将条件格式公式指向此工作表或另一工作表上的单元格,以便Tab 1用户可以通过编辑包含目标工作表名称的相关单元格来更改确定突出显示的工作表(此处)。

相关内容