MS Office Excel 通过 VB 脚本指定选定单元格行列颜色

打开 MS EXCEL 文件,使用【ALT + F11】,打开编辑器,选择需要修改的 Sheet 页面,输入如下内容

复制代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.Interior.ColorIndex = xlNone

ActiveCell.EntireRow.Interior.ColorIndex = 35

ActiveCell.EntireColumn.Interior.ColorIndex = 35

End Sub
复制代码

输入后如下所示:

 

 

保存后退出,选定任意单元格后效果如下所示。

 

PS:效果展示中删除了列的颜色展示。

 

posted @   范丰平  Views(507)  Comments(0Edit  收藏  举报

喜欢请打赏

扫描二维码打赏

支付宝打赏

点击右上角即可分享
微信分享提示