excel所选单元格所在行列高亮显示,但不影响单元格本身。

发布网友发布时间：2022-04-23 07:08

共2个回答

热心网友时间：2022-06-17 06:48

事件代码，放在sheet里

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
    ActiveWorkbook.Names.Add Name:="sRow", RefersToR1C1:=Target.Row
    ActiveWorkbook.Names.Add Name:="eRow", RefersToR1C1:=Selection.Cells(Selection.Cells.Count).Row
    ActiveWorkbook.Names.Add Name:="sColumn", RefersToR1C1:=Target.Column
    ActiveWorkbook.Names.Add Name:="eColumn", RefersToR1C1:=Selection.Cells(Selection.Cells.Count).Column
End Sub

然后选中要设置的区域，设置条件格式，公式

=OR(AND(ROW()>=sRow,ROW()<=eRow),AND(COLUMN()>=sColumn,COLUMN()<=eColumn))

不要全选工作表设置条件格式，会出错

追问可是我需要的就是在全表格里面操作，而不是针对一个区域用条件格式

追答你可以试试，也许不会出问题

热心网友时间：2022-06-17 06:49

用宏实现，代码如下：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.Interior.ColorIndex = xlNone

Rows(Selection.Row & ":" & Selection.Row + Selection.Rows.Count - 1).Interior.ColorIndex = 35

Columns(Selection.Column).Resize(, Selection.Columns.Count).Interior.ColorIndex = 35

Target.Interior.ColorIndex = xlNone

End Sub

效果图如下：

全部频道

excel所选单元格所在行列高亮显示,但不影响单元格本身。