可以使用条件格式来达到你的目的
用一段代码试试：
点工作表标签——右键——查看代码，粘贴以下代码——关闭VBA窗口：
PrivateSub Worksheet_SelectionChange(ByVal Target As Range)
With Target
.Parent.Cells.Interior.ColorIndex =xlNone
.EntireRow.Interior.Color = vbGreen
.EntireColumn.Interior.Color = vbGreen
End With
EndSub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024