选择范围,
开始---条件格式---- 新建规则,
使用公式确定。。。。。
输入:
=(ROW()=CELL("row"))+(COLUMN()=CELL("col"))
格式 填充,选择一种颜色
右键工作表标签,查看代码
如下复制进去:
|
1
2
3
4
|
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
|
Excel另存为 Xlsm
格式,启用宏,
加载中,请稍候......