这个需要用到代码，方法如下：
1。打开需要应用的excel。
2。按ALT+F11，会弹出代码编辑框。
3。在左边会显示出上下两个类别框里，名字分别是Project-VBAProject和Properties-sheet1（这个sheet几是你当前编辑的表单）
4。在上面的框边有三个小图标，view code（查看代码），view project（查看项目），toggle folder（打开或折叠文件夹）。
5。选择view code，会弹出一个编辑框。
6。在编辑框里黏贴下面的语言：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
‘清除工作表单元格的背景色
。Parent。Cells。Interior。ColorIndex = xlNone
’设置选中区域所在行的背景色
。EntireRow。Interior。Color = vbGreen
‘设置选中区域所在列的背景色
。EntireColumn。Interior。Color = vbGreen
End With
End Sub
7。 贴完之后，关闭对话框。关闭编辑框，返回到excel。
8。这时候你再点击任意单元格，就会自动出现你要的效果了。
备注：上面语言中的汉语不用删除，汉语可以可以帮助你了解该行的意思，同时也不会影响编辑效果。如果对行或列的色彩不满意，可以参考下面的色彩代码，自行修改。
vbBlack 黑
vbRed 红
vbGreen 绿
vbYellow 黄
vbBlue 蓝
vbMagenta 洋红
vbCyan 青
vbWhite 白
上面的办法对已经有填充色的表格是个灾难，它会清楚原有颜色。
你也可以试试下面的方法：
Private Sub Worksheet_SelectionChange(ByVal Target As Excel。Range)
On Error Resume Next
Cells。FormatConditions。Delete
With Target。EntireRow。FormatConditions
。Delete
。Add xlExpression， ， “TRUE”
。Item(1)。Interior。ColorIndex = 7
End With
End Sub
这个虽然只能显示行不能显示列，但是不会破坏原有填充色。
回答完毕，希望是你要的。
1，打开Excel程序，进入Excel程序主界面。
度查看大图“ class=”ikqb_img_alink“>
2，在Excel程序主界面上方选择【视图】按钮，点击进入。
3，在“视图”的菜单下选择“阅读模式”。
4，选择“阅读模式”的颜色，点击选中。
5，最后，即可选中一个单元格，该行列都变色，问题解决。
这个需要用到代码，方法如下：
1。打开需要应用的excel。
2。按ALT+F11，会弹出代码编辑框。
3。在左边会显示出上下两个类别框里，名字分别是Project-VBAProject和Properties-sheet1（这个sheet几是你当前编辑的表单）
4。在上面的框边有三个小图标，view code（查看代码），view project（查看项目），toggle folder（打开或折叠文件夹）。
5。选择view code，会弹出一个编辑框。
6。在编辑框里黏贴下面的语言：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
’清除工作表单元格的背景色
。Parent。Cells。Interior。ColorIndex = xlNone
‘设置选中区域所在行的背景色
。EntireRow。Interior。Color = vbGreen
’设置选中区域所在列的背景色
。EntireColumn。Interior。Color = vbGreen
End With
End Sub
7。 贴完之后，关闭对话框。关闭编辑框，返回到excel。
8。这时候你再点击任意单元格，就会自动出现你要的效果了。
备注：上面语言中的汉语不用删除，汉语可以可以帮助你了解该行的意思，同时也不会影响编辑效果。如果对行或列的色彩不满意，可以参考下面的色彩代码，自行修改。
vbBlack 黑
vbRed 红
vbGreen 绿
vbYellow 黄
vbBlue 蓝
vbMagenta 洋红
vbCyan 青
vbWhite 白
上面的办法对已经有填充色的表格是个灾难，它会清楚原有颜色。
你也可以试试下面的方法：
Private Sub Worksheet_SelectionChange(ByVal Target As Excel。Range)
On Error Resume Next
Cells。FormatConditions。Delete
With Target。EntireRow。FormatConditions
。Delete
。Add xlExpression， ， ”TRUE"
。Item(1)。Interior。ColorIndex = 7
End With
End Sub
这个虽然只能显示行不能显示列，但是不会破坏原有填充色。
回答完毕，希望是你要的。