这个要用VBA处理。
Sub Macro1()If Cells(1, 1).Interior.ColorIndex <> -4142 Then Cells(1, 2).Interior.ColorIndex = Cells(1, 1).Interior.ColorIndexEnd IfEnd Sub
