当您双击工作表上的单元格时，Excel VBA将执行添加到Worksheet BeforeDoubleClick事件中的代码。
1.打开Visual Basic编辑器。
2.在项目资源管理器中双击工作表（例如Sheet1）。
3.从左侧下拉列表中选择“工作表”。从右边的下拉列表中选择BeforeDoubleClick。
注意：“ _”符号用于在新行上继续该语句（以向您显示完整的代码）。
将以下代码行添加到工作表BeforeDoubleClick事件中：
4.下面的代码行将活动单元格涂成红色。
Target.Font.Color = vbRed
5.如果您不想发生默认的双击操作（单元格编辑模式），请将Cancel参数设置为true。
取消= 正确
6.通过双击Sheet1上的一个单元格来测试程序。
结果：
