如何在Excel中设置，当点击其中任何一个单元格时，相应的横竖列就会自动填充成同一颜色。

右键当前工作表名称（下方的标签）---查看代码--把下列代码复制进去即可！ Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target .Parent.Cells.Interior.ColorIndex = xlNone .EntireRow.Interior.Color = vbGreen .EntireColumn.Interior.Color = vbCyan .Interior.Color = vbR