首页 热点专区 义务教育 高等教育 出国留学 考研考公

excel聚光灯怎么取消

发布网友

我来回答

1个回答

热心网友

通过设置一个按钮来控制聚光灯功能的随时关闭和开启。效果为:

实现过程:
1、开发工具——插入——ActiveX控件复选框——在设计模式下右键复选框——查看代码,打开代码输入界面,粘贴下面的代码:
Private Sub CheckBox1_Click() If CheckBox1.Value = False Then CheckBox1.Caption = "关" ActiveSheet.Cells.Interior.ColorIndex = xlNone Else CheckBox1.Caption = "开" End IfEnd Sub
2、在表单Worksheet_SelectionChange代码编辑区,修改代码:
Private Sub Worksheet_SelectionChange(ByVal target As Range)If CheckBox1.Caption = "开" Then Call 聚光灯(target)End SubSub 聚光灯(rg As Range)If Application.CutCopyMode = False ThenWith rg.Parent.Cells.Interior.ColorIndex = xlNone.EntireRow.Interior.Color = vbGreen.EntireColumn.Interior.Color = vbCyan.Interior.Color = vbRedEnd WithEnd IfEnd Sub

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com