excel表格怎么显示立体颜色

1.excel让单元格显示颜色

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Count >1 Then Exit Sub

If Target.Column i = Target.Row

If Range("A" & i) "" And Range("B" & i) "" And Range("C" & i) "" Then

Range("D" & i).Interior.Color = RGB(Range("A" & i).Value, Range("B" & i).Value, Range("C" & i).Value)

End If

End If

End Sub右键该工作表，查看代码，粘贴我给你的代码，并确保宏安全性为低才能用。

2.EXCEL 表格颜色显示

看看我这个是不是更能满足你的要求：

alt+F11进入VBA，左侧双击当前工作表名称，右侧代码处复制一下内容

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

With Target

.Parent.Cells.Interior.ColorIndex = xlNone

.EntireRow.Interior.Color = vbCyan

.EntireColumn.Interior.Color = vbCyan

End With

End Sub

切换到工作表，点任意单元格看看效果？