好吧问答库 > 大家好,有谁知道:在excel2007中选中某个单元格后该单元格所在的行与列都能高亮颜色显示?

大家好,有谁知道:在excel2007中选中某个单元格后该单元格所在的行与列都能高亮颜色显示?

2024年11月28日 13:32

有4个网友回答

网友（1）：

选择范围，

开始---条件格式---- 新建规则，使用公式确定。。。。。

输入：

=(ROW()=CELL("row"))+(COLUMN()=CELL("col"))

格式填充，选择一种颜色

右键工作表标签，查看代码

如下复制进去：

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Calculate
End Sub

Excel另存为 Xlsm 格式，启用宏,

附件是设好的

网友（2）：

将鼠标一直该单元格所对应的行或列，此时，鼠标便会变成一个箭头，我们点击所对应的行或列，随后对其进行加颜色处理即可。

网友（3）：

按alt+f11，选中sheet1，粘贴进去
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim colstr As String
With Target
colstr = Mid(.Address, 2, InStr(2, .Address, "$") - 2)
Range(ActiveCell.Address & "," & colstr & ":" & colstr & "," & .Row & ":" & .Row).Select
End With
End Sub

复制这个代码，在excel表中按alt+F11键，双击sheet1（也就是你表所在位置），然后粘贴进去

也可以在网上下载一个叫“EXCEL必备工具箱”的插件包，
安装后里面有很多，
其中就有“防止看错行（列）”的等等

网友（4）：

在工作表名（例如：sheet1）上右键，”查看代码"，复制粘贴以下代码就可以了：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Rows(Target.Row).Interior.ColorIndex = 8
Columns(Target.Column).Interior.ColorIndex = 8
End Sub