office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Excel vba设置选中单元格行列填充,高亮显示聚光灯效果

2020-05-04 08:00:00
tmtony8
原创
125

前面讲过关于利用条件格式高亮填充行列的例子《Excel 利用条件格式设置十字交叉高亮显示聚光灯效果


当然也可以利用vba代码来做这个功能,在工作簿对象中,添加sheetSelectionChange事件。



Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Sh.Cells.Interior.ColorIndex = xlNone
    Target.EntireColumn.Interior.ColorIndex = 22
    Target.EntireRow.Interior.ColorIndex = 22
End Sub



注意:当Excel表格中使用代码的时候,需要把表格另存为【Excel启用宏的工作簿(*.xlsm)】的格式。

    分享