请教下有没有方法让EXCEL表格
这个只好通过宏解决,方法很简单,在需要此功能的工作表标签上右击,然后点“查看代码”,在编辑器窗口中复制如下代码:
Option Explicit
Dim x%, y% '定义全局变量,储存上次选择时的单元格位置
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target。 Cells。Count = 1 Then '选择单个单元格时执行高亮操作
If x + y = 0 Then
x = 1: y = 1 '初始化上次选择的单元格位置
End If
With ActiveSheet。 Cells(x, y...全部
这个只好通过宏解决,方法很简单,在需要此功能的工作表标签上右击,然后点“查看代码”,在编辑器窗口中复制如下代码:
Option Explicit
Dim x%, y% '定义全局变量,储存上次选择时的单元格位置
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target。
Cells。Count = 1 Then '选择单个单元格时执行高亮操作
If x + y = 0 Then
x = 1: y = 1 '初始化上次选择的单元格位置
End If
With ActiveSheet。
Cells(x, y) '取消上次选择时产生的背景色
。EntireColumn。Interior。ColorIndex = 0
。EntireRow。Interior。ColorIndex = 0
End With
'设置当前选中单元格所在行和列的背景色
Target。
EntireRow。Interior。ColorIndex = 37
Target。EntireColumn。Interior。ColorIndex = 37
'记录本次选择的单元格的位置
x = Target。
Row
y = Target。Column
End If
End Sub
效果如附件所示:。收起