2007 excel用公式实现鼠标 点击单元格后就变色 离开后就恢复原来的颜色

如题所述

选定需要有这种效果的工作表,同时按下ALT+F11,复制下列代码,粘贴,保存为启用宏的工作簿,即  .xlsm

Dim OldTarget As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not (OldTarget Is Nothing) Then OldTarget.Interior.Pattern = xlNone
    Set OldTarget = Target
    OldTarget.Interior.Color = 65535
End Sub

温馨提示:答案为网友推荐,仅供参考
第1个回答  2016-09-13
VBA才行 公式做不到这效果追问

只能写程序?那玩意儿不懂啊

只能写程序?那玩意儿不懂啊

追答

你这个问题和鼠标事件挂钩,不用VBA只用公式做不出来

相似回答